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DT X02 
1620-i CIV TEST 



PROGRAM DESCRIPTION DIPAL NAME DX02 

1. Purpose 

Tliis program tests the circuitry used by the following operations: 

Bl/BNl OVERFLOW INDICATOR 

Dl/BNl HI/PLUS INDICATOR 

Bl/BNl EQUAL/ZERO INDICATOR 

Bl/BNl HI/PLUS OR EQUAL/ZERO 

BTM 

BT 

CM 

C 

AM 
A 
SM 
S 

MM 
M 

LDM 
LD 
DM 
D 

In addition, it tests the Sense/Branch Decoders for decoding Branch Modifiers, 
and Add Table Addressing. 

2. Test Method 

Tliis program is a fault detection test, and is written in short, independent 
routines. There are three types of routines. The program deck is. in standard 
SPS format and uses a standard loader. A listing and description of the loader 
is included. • 

a) . Branch Tests 

The Branch and Transmit operation and H/P, E/Z and OFLO conditional branches 
are tested. An error will cause an exit to a corranon error routine which 
will, if Switches 1 and 3 are off, type the address of the error exit. 

b) . Add Table. Addressing 

This section tests the Add operation for correct add table addressing for 
all digit combinations. A table lookup routine is used to check for correct 
results. The error routine will type the error exit* P and Q digits, and 
computed sum if Switches 1 and 3 are off. 
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c) . Arithmetic Tests 

A common test and error> routine checks the results of all arithmGtic 
operations, including Compare, for correct indicator conditions and 
arit]in>etic results.. The error typeout gives the location of i;he routine, 
computed ilesults and indicators/ and expected results and Indficator^ 

3. Modifications - This program cannot be independently loaded by DIPAL. It 
must be preceded by DTXOl, and the two programs will be loaded as one. Tlie 
operation from file will be the same as from cards. 

M. Units of System Required 

This program requires tl^e 1620 CPU and 1622 reader or 1621 Paper Tape reader. 

5. E/C Level 

1620-1 E Suffix and above, A test for the optional feature Divide is included, 
but it may be bypassed, 

LOADING INSTRUCTIONS 

1. Clear Core by inserting 31 00003 00002. 
Release/Start 

2. Load test deck from 1622 by pushing LOAD button. 

The program may also be loaded by turning Console Switch U off while running 
the 1620-1 Header test. In this case, both the Header test and DT X02 will 
operate as one program after DT X02 is loaded. 

3. If Paper Tape reader is used DTX02 was loaded with DTXOl J 

M. Program will halt with 00011 in MAR after completion of loading. Set Console 
switches to the desired position and press START, 

OPERATING INSTRUCTIONS 

1. The Load Dividend and Divide tests may be bypassed by removing the eighth 
card from the end of the deck (Card No. 307) . 

2. No manual intervention other than the setting of the console switches is 
required for normal operation, 

3. Console Program . Switches 

The Switches have the following functions in this program: 



DTX02 Page 2 
PN 2172333 
EC 404980 



Switch 1 ON Bypass all error routines 
OFF Test Switch :l on error 

Switch 2 ON Loop in test roijtine 

OFF Continue to next; routine 

Switch 3 ON Halt on erroip if Switch 1 OFF 
OFF Typeout on eyror Switch 1 OFF 

Switch 4 ON Repeat program 

OFF Load next program from 1622 

M. Every 100 passes, the program will typeout the test name and total number 
of passes complete. At the completion of any pass and Switch 'I OFF, the 
test name and number of passes complete will be typed out, and the card 
reader will be selected. 

5 . Data Check Switches 

The program assumes all data check switches are off, and monitors the 
check indicators for error checks. 

6. Normal Program Halts 

Tlie only normal halt is at location 00000 in the SPS loader. Press start 
to execute the program. 

ERROR INFORMATION 

1. Error Halts 

There are three error Halts in the program. 

17356 Error in the Branch Test section. Display 1R2 for the 

location +12 of the error exit. 

17550 Error in the Add Table Addressing test. The routine 

starts at 10630, and the error exit is at 10726. 

16686 Error in the Arithmetic Test section. Display 1R2 for 

the location +12 of the error exit. 

2. Error Typeouts . 

Explanations and examples of the error typeouts are given on Pages 
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ERROR TYPEQUTS 



Example 1 

This is a failure in the brpnch test section. where there are no atitlunetlc 
results.' The location refers to the error exit following an unsuccessful 
test. 

Example 3 

This is the error typeout for the add table addressing test. 09 + 09 are 
the highest values used. The typeout shows the "P" digit, "Q" digit and 
the computed sum. 

Examples 2 and M - 7 

This is the error typeout for the arithmetic operations, (compare, add, 
subtract, multiply and divide) . 

The first line gives the location of the first instruction in the test 
routine. Tlie second line is the correct indicator conditions and arith- 
metic results. The third line is the indicators and arithmetic results 
of the operation being tested. 

For a compare operation, only the indicators are typed out, since there are 
no arithmetic results. For a divide operation, the arithmetic results will 
be in two fields. The left most field is the quotient, the other is the 
remainder. It is in the same format as it would appear in tlie product area. 

Line 1: ERROR IN ROUTINE AT Il3 3 8 

The first instruction of the failing routine is at memory location 11338. 

Line 2: 0000 0108161875 

Hi/Plus- V - 1 

Equal/Zero ' 

Overflow— - • 

Any Data Check — 

This is what the results should be. Tlie first four digits represent the 
indicator conditions. A one says the indicator should be on, a /.oro says 
it should be off. In this example, all indicators should be off. The 
second number is what the arithmetic result should be. 

Line 3: 1000 087108827 

This is the actual results of the operation. Tlie Hi/Plus indicator is 
wrong, as well as the numeric answer. 
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EXAMPLES: 

For the details of the test routine causing any error typeout, refer to the 
program listing. 

1. ERROR AT LOCATION 0802M . See locat|.on 0802'! of listing. The BV operation 
preceding the BTM did not branch, 

2. ERROR IN ROUTINE AT 098'l«l 

1000 Correct indicators 

1010 Incorrect indicators 

A compare operation turned on the overflow indicator in error. Tlie data 
field is blank, since there was no arithmetic results from the operation. 

3. ERROR AT LOCATION l0726 1620 SAYS 8 + 8 = 15 

This is an i?rror in the add table addressing test. The first digit is the 
"P" digit, the second digit is the "Q" digit, and the last two digits are 
the computed sum. 

i|. ERROR IN ROUTINE AT 11338 

0000 0108161875 Correct 

1000 0887108927 Incorrect 

Hi/Plus Indicator Wrong 

5. ERROR IN ROUTINE AT Tl6»»0 

0000 2899UU8 Correct 

OOOO m"7 8050*8 Incorrect 

6. ERROR IN ROUTINE AT 12978 

TOOO 20O0 Correct 

TOOO 02000 Incorrect 

Wrong field length 

7. ERROR IN ROUTINE AT IM916 

loOO 00000596925318281187667M033050 Correct 

Togo 00000496925318281187667M033050 Incorrect 

Quotient Remainder 
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on5i 




YE'S 



oeooo 



/7S3ZX 



^ 



e — - 



<• : 



_4 BllBfil 



06766 



9 



re^T 



088 BQ 



— 



_ 7^5 T 
Bl/BNI 

H/.p f/l 



08996 



09260 



— y 



resr 



09598 



OTX02 /^ioiv cf^/ter 



AO0 TA BU 



/0866 



17532 



Aoo neif 



%A6f8 



rF5T 
ADO 



/2<f7S 



S£/6T/?ACr 



12764 



rrsr 



/J606 



rsST 

lOAD 



13928 



^PAOtJ 



TFSr 



7 77 to 



Y603S 



PASS 
COMpLfTe 



/ 1T94 



4iPAC€$ 







— > 



^PA6£^ 




t T60i> 




OPP 



LOAD 
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rrp/c^L ef(A^n rest 
nourtNe ano 



c 



TfST ENTRY 



ANY 

pcoTfNe 



Mr COMMON ERROR 



li^RNON^ 
OFIO MO 




GTM TO 




0TA1 TO 




0807 Z 





0TM TO 




tifROR RTfi 




06084 




OFF 



TYPE ERROR 



RES^TCMfCK 
INDtCATOR^ 



Bf^ANCH 
BACK 
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re^r 



LMOpwiomD tar 



XO TS^STPatfT/A/B 



Te^AJSMfT TO 

r£^r fiourtA)£ 



ANY Ammntc resr 

TT- 



3 



^F'AG£4 



! jRjB\,^ ---.i 




A/SXT 
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CC/?fi£CT DATA 



///jo/ca tor, 

P/ITTSJ^^ 



tif3£SL 



NO 



PAG£S 





yes. 



T^Al^^MlT 
TO T£ZT AfifA 



/VOeMAOU 


DATA 


/hi 


rssT 









* t£ST 
fiRiTHAABTfC 
fi£SULTS 



FAnes 



DTX0L PLO^ C/^Aet 
COflAMON ARITH. 





PAces 
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yes 



Tfsr 



CORR£CJ 




NO 



S£7 
f/^ROR FLAC 





Y£S 




TYP£OUr 




HALT 





o/es, 
£pRm 






S^AnC.H BACK 
TO 
P/fOGPAM 



V 

I 
t 

f 

y 
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PA6e 7 



PA6i 7 



pytcs 7 



re ST 

E/iTRY 



set Q no 

70 OO 



f 0<y54 



SET CONSTANT 
7 ABLE IN WORK 
A RCA 



SET P 


FffLO 


FROM HI OimOf 


\f/ORK AREA 


^TART 


psQQ 


/OC7S 




ADD 2 Dion P 


TO 2 DlCtl Q 






pur 


miTs 


D/C/7 


OF sum 


W (pU OF 3D OP 

. 







POT COI^PECr 
ANSWER //V 
Pa OF TR OP 



D7i0z pioiA^c^Aer 

PAdE 6 

ADD TABLE AOOn'SS 
7£ST 



fmPLf 



CCNSTAfJT 
TABLE 



0 f 2 3^56 73901 23^S67Q^ 



/^PASS P'OO 001 Z3fS6 7a90IE34S(>7e* \ "HORK 
2*^/3*15 OS*f547a90t i345i>7at**f J AR£A 

2 % 
Q 0 

6 8 

p^fPOO 0IZ345(>789OlZ345L78i^ 
(p'G5,PrOO 0l23'^5i>789O/Z3*1S(>78* 
<p^d5,p-d3 01 Z3't567e90lZ3fS(>7a* 

ADO 054O3'Oe , AOJOSTE'O TP ADDRESS 
/S TR 0007S, /083<7 C PAOR /S TO-h CORRECT 
SUM), ADJ0S7eD eO ADDRESS 
/J BO f7S3Zj OOOea ( <p AOR IS 80 f T//£ 
COA^PUTeO iSOAA), /INSWfR /S CORRECT 
ANO as CONTAINS Z€/?0, 



BD IMST 

WtLL e£ 

30 ir5dZ^rao4^soM) 



CORRECT AmWPR 
WILL BE IN lOC^ 

(iTiooi-t^ oicir) 
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PAG£B 



0. 



DrX0Z FLOW cHA^r 
PAG £7 

ADO TABU AOa^fSS 
r£ST 



60CAT/O/^ CSO-t-COMPUTepSOM) 
W/LL CONrA//\/ g£M if^^t/M 



t07lL 

IOC 

Xeo-f-^oA/i) 

i£/?or 



077*1 



A/?SA l£^T 6YI 

TO //vce£AS£ 

PBYl 



f078(> 



/A/C/F£AS£ 
p D/Gf7 
BY I 



PA6£B 




PA6£(> 




ALL 
PiGtrs 



PAG£ 6 
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eA(S£ 7 






OFP 


I7560 




BTM TO 


TrP€ OUT 


cffRQ/K an ADR 







Tfsr f^BSUtrs 




TYP^our 
T£'ST f^emis 



rest 



QN 




® 
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f7flC 



PASS 
COO//T 



DtX^Z PLC^ CM94iT 
PASS COM 
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SPS LOADER 



Q 



IOC 


OPER 


P 




REMARKS 


00000 


RNCD 


00072 


00500 


READ SECOND LOAD CARD 


00012 


RNCD 


00201 


00500 


READ FIRST PROGRAM CARD INTO 201->280 


00024 


BNF 


00012 


00276 


IGNORE CARD IF NO FLG IN COL 76 


00036 


TF 


00059 


00274 


LOC OF LAST POSITION +1; A RM ON CARD 


00048 


TD 


03011 


00000 


SAVE DIGIT THAT IS ALREADY IN LAST POSITION +1 


00060 


TF 


00090 


00269 


269 HAS LOC FIRST INSTRUCTION TO BE STORED IN 


00072 


TF 


00095 


00264 


LOC (01) IF A PROG CARD; (08 IF THIRD LOAD CARD) 


00084 


TR 


00000 


00200 


RECORD FROM 201->-272 TO LOCATION SPECIFIED BY CD 


00096 


TF 


00114 


00274 


LAST LOCATION +1; HAS A RM 


00108 


TD 


00000 


00011 


REPLACE RM WITH DIGIT SAVED IN LOC 11 


00120 


B 


00012 


00000 


GO TO READ NEXT CARD 










CARDS THREE AND FOUR REPLACE LOC 00000->00119 


00096 


RNCD 


00000 


00500 


READS LOAD CARD FOUR AND PUTS IN LOC 00000 


00108 


6 


00000 




NEXT INSTRUCTION COMES FROM CARD FOUR 


00000 


RNCD 


uj 100 


AA CAA 

00500 


(READ CARDS rIVc, SIX, ScVcN AND tIGHTj 


00012 


RNCD 


00172 


00500 


( CONTAINS ADD AND MULTIPLY TABLES 


00024 


RNCD 


00244 


00500 


( 


00036 


RNCD 


00316. 


00500 


( 


.00048 


RNCD 


00000 


00500 


READ CARD NINE !NTO 00300, NEXT INST. COMES FROM LOC 60 










OF CARD NINE 


00000 


H 


00000 


00000 




00012 


B 


LOCX 




BRANCH TO FIRST PROGRAM LOCATION 


00019 


67 




^5675 


LAST TWELVE POSITIONS OF ADD TABLE 


00031 


4b 


bbb 






00036 


TR 


00388 


00019 


TAKE LAST TWELVE POS OF ADD TABLE TO CORRECT LOCATION 


00048 


B 


00000 


00000 


GO TO 03 FOR PROG HALT 


00060 


B 


00036 


00000 


GO TO MOVE ADD TABLE 
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SPS ASSEMBLED PROGRAM 



The Symbolic Programming System pepmih fhe programmer to code in a symbolic language that 
is more meaningful and easy to handle than numerical machine language. SPS converts the 
symbolic instructions to machine language, assigns and keeps a record of storage locations^ 
checks for coding errors, and punch^p out a machine language program deck or tape. It al«o 
allows additions, deletions and r^-location of the program to be mode quickly ond easily. 

SA^APLE SPS LISTING 

Machine Language Same as Source Card 



Storage 


Op 


P 


Q 




Op 






Adr 


Code Address 


Address 


Label Code 


Operands 


Comments 


Line 1 04806 


26 


19030 


04868 


AD6 


TF 


WORK,AP6,, 


SET P 


Line 2 04818 


21 


19030 


04874 




A 


WORK,AQ6,, 


ADD 3 DIGIT P TO 6 DIGIT Q 


Line 3 04830 


17 


18038 


-4875 




BTM 


TEST,CAD6-4,, 


TEST SUM AND INDICATORS 


Line 4 04842 


46 


04806 


00200 




BC2 


AD6,,, 


L00PIFSW2 0N 


Line 5 04854 


49 


04890 


00000 




B 


AD7 




Line 6 04868 




00003 




AP6 


DC 


3,636, , 


P 


Line 7 04874 




00006 




AQ6 


DC 


6,999347,, 


Q 


Line 8 04879 




00005 


-4806 


CAD6 


DSA 


AD6 




Line 9 04883 




00004 






DC 


4,1010,, 


INDICATORS 


Line 1004885 




00002 






DC 


2,03,, 


FLD LENGTH OF ANSWER 


Line 1 1 04888 




00003 






DC 


3,983,, 


ANSWER 


Line 1204889 




00001 






DC 




RECORD MARK 



This sample program listing from the diagnostic was ossemble^d by the 1620/1710 SPS Programming 
System and listed on the 407. Since the 407 cannot print a flag, a flagged digit will be listed 
OS alphabetic characters; flog zero as -, and flogs 1-9 as j-R. 

The following terms refer to the various fields of the symbolic instructions as they are written by 
the programmer: ' 

Label - The symbolic storage address of data or instructions. It is assigned a numerical 
value during the assembly process. The symbols ore arbitrarily chosen by the 
programmer and have no significence in other programs. 

Op Code - The mnemonic representation of a two-digit operation code. 

Operands - Either a symbolic or numerical value to define the Information to be operated upon. 
They ore used to define the P ond Q fields, and positions of flags, if any, of a 
1620 operation. Their use in a pseudo-instruction will be explained later. 

Comments - The programmer may use this field for any comments he wishes to moke. Comments 
have no effect on the ossembied program* If an asterisk (*) is placed in column 6 
of the source card, coluirms 7 * 75 may be used for comments ond wiM not offecf 
the obfect program* 



DTX02 Page 16 
PN 2172333 
EC II0U980 



There ore a number of operations In the SP^ language which are not machine operations. These 
c^re some ti fries referred to as Pseudo-ops or Psegdo-lnstnjctlons. These pseudo-instnjctions ore 
Instructions to the SPS processor to perform certain functions. One class of these pseudo- Instru- 
ctions ore termed "Declarative Operation Codes''. These Op Codes provide the object program 
with Input/Output arcos, work areas and constant. They do not produce instructions which are 
executed in the object program. For further information see the Reference Manual for 1620/1710 
SPS, Form 'C26-5600-0. 

An «>^P'<?t»a*'^? of coch line of the sample arit|imetic test listing follows: 

Line 1 - AD6 Is the symbolic location of the ifistrviction, and is assigned the value 04806. 
. TF js Ibe rnnemonic Op Code for Op ^6. WORK is the symbolic P address and is 
assigned the value 19030. AP6 is thf symbolic Q address and is assigned the 
value 04868. The absence of a third- operand indicates that the programmer did 
not desire to place any flags in the assembled instruction. The comment "SET P" 
-IS; a programmer npte. 

Line 2 - Some as Line 1 

. .Line-3 - i^Sqme ^^s Line 1 except j'his, is an Immediate Op Code and the assembler automotically 
places a flag over Q7, unless otherwise instructed. The actual Q address is 04875, 
but the 407 lists it OS -4875. 

Line 4 - The pssembler recognizes that the mnemonic Op BC2 requires a Q address of 00200, 

so tbe programmer does not hove to define the Q address. The some machine instruction 
would hove been assembled by writing Bl AD6, 00200, , or 46 AD6,00200, , . 

Line 5 - Some as above. 

Line 6 - The pseudo-Op "DC" means define constant. The first operand, 3, soys the constant 
field is to be 3 digits long. The second operand, 636, Is the actual constant, A 
third operand would Instruct the assembler the location to assign to the constant, 
but since it Is missing, the assembler assigns an address. The label, AP6, Is assigned 
the value of the address of the low order digit. In this example, AP6 is 04868, and 
the constant Is located at 04866 through 04868. The comment "P" is a note indicating . 
that 636 will be the P field for the arithmetic operation. The constant Itself does not 
appear In the machine language listing, only the field length. From the machine 
language listing, we see that at address 04868, there is a 3 digit field. 

Line 7 - Some as Line 6. A 6 digit field is stored at 04869-04874. 

The pseudo-Op *'DSA'* means define symbolic address. In Line 1, AD6 was assigned 
the value 04806. DSA causes the 5 digit constant, 04806, to be stored dt address 
04879, and the label *'CAD6" is assigned the value 04879. 

10, 1 1 - Some as Line 6 except there Is no label* 

Line 12 -The special character * causes a record mark to be placed In the ob|ect program at 
location 04889. . 



Line 8 - 



Lines 9, 
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FORMAT OF THE OUTPUT PEC K 

The object program is proccded b/ two loader cards and followed by seven cards that perform 

the following: 

1 • Interrupt the loading sequence of the object program. 

2. Load the arithmetic tables. 

3. Branch to a Holt at completion of Idpading. FoMowing the Halt will be a Branch to the 
start of the object program. 

There ore two cord formats in the object program, one for instructions and one for constants* 

Cords containing instructions: 

They may contain from I to 5 instructions, or 12 to 60 characters. The lost instruction is 
followed by a record mark. 

Columns: 



1- 


■60 




61 




62 


63- 


-64 


65- 


-69 


70- 


-74 




76 


77- 


-80 



Cords containing constants: 

They may contain from 1 to 60 characters followed immediately by a record mark. 

Columns: 1-60 Constant 

61 t (record mark) if less than 60 characters, will follow lost character. 

62 1 

63 51 

65-69 left most address where constants are to be loaded 

70-74 Right most address plus one, where constants are to be loaded 

76 Flog only 

77-80 Card number 



ADH/pvb 
3/20/63 
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OPERA TrON CODES 



OPERANDS 



OPERATION 


Numeric 


Actual 


P Address 


Q Address 


Tested 


Add 


A 


21 


P Field Address 


Q Field Address 




Add immediate 


AM 


11 


P Field Address 


Data 




Branch 


B 


49 


Brat^ch to Address 


Not Used 




Branch Any Data Check 


BA 


46 


Branch to Address 


01900 


All Data Check 
Indicators 


Branch Back 


BB 


42 


Not Used 


Not Used 




Branch Console Switch 1 ON 


BCl 


46 


Branch to Address 


00100 




Branch Console Switch 2 ON 


BC2 


46 


Branch to Address 


00200 




Branch Console Switch 3 ON 


BC3 


46 


Branch to Address 


00300 




Branch Console Switch 4 ON 


BC4 


46 


Branch to Address . 


00400 




Branch On Digit 


BD 


43 


Branch to Address 


Location Tested 




Branch Equal 


BE 


46 


Branch to Address 


01200 


E/Z 


Branch High 


BH 


46 


Branch to Address 


01100 


H/P 


Branch Low 


BL 


47 


Branch to Address 


01300 


H/P & E/Z 


Branch Last Card 


BLC 


46 


Branch to Address ' 


00900 


Last Card 


Branch Negative 


BN 


47 


Branch to Address 


01300 


H/P&^/Z 


Branch Not Any 
Data Check 


BNA 


47 


Branch to Address 


01900 


All Data 

Check Indicators 


Branch Console Switch 1 OFF 


BNCl 


47 


Branch to Address 


00100 




Branch Console Switch 2 OFF 


BNC2 


47 


Branch to Address 


00200 




Branch Console Switch 3 OFF 


BNC3 


47 


Branch to Address 


00300 




Branch Console Switch 4 OFF 


BNC4 


47 


Branch to Address 


00400 




Branch Not Equal 


BNE 


47 . 


Branch to Address 


01200 




Branch No Flag 


BNF 


44 


Branch to Address 


Location Tested 
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OPERATION CODES OPERANDS Indicators 



OPERATION 


Numeric 


Actual 


P Address 


Q Address 


Tested 


Branch Hot High 


BNH 


47 


Branch to Address 


01100 


H/P 


Branch Not Low 


BNL 


46 


Branch to Address 


01300 


H/P & E/Z 


Branch Not Last Cord 


BNLC 


47 


Branch to Address 


00900 


Lost Card 


Branch Not Negative 


BNN 


46 


Branch to Address 


01300 


H/P & E/Z 


Branch Not Positive 


BNP 


47 


Branch to Address 


01100 


H/P 


Branch No Record Mark 


BNR 


45 


Branch to Address 


Location Tested 




Branch No Overflow 


BNV 


47 


Branch to Address 


01400 


Overflow 


Branch Not Zero 


BNZ 


47 


Branch to Address 


01200 


E/Z 


Branch Positive 


BP 


46 


Branch to Address 


01100 


H/P 


Branch and Transmit 


BT 


27 


Branch to Address 


Address of Field 
to be Transmittec 




Branch and Transmit 
Immediate 


BTM 


17 


Branch to Address 


Data to be 
Transmitted 




Branch Overflow 


BV 


46. 


Branch to Address 


01400 


Overflow 


Pranch Zero 


BZ 


46 


Branch to Address 


01200 


e/z 


Compare 


C 


24 


P Field Address 


Q Field Address 




Clear Flog 


CF 


33 


Location to be 
Cleared 


Not Used 




Compare Immediate 


CM 


14 


P Field Address 


Data 




Divide ' 


D 


29 


P Field Address 


Q Field Address 




Divide Immediate 


DM 


19 


P Field Address 


Data 




Halt 


H 


48 


Not Used 


Not Used 




Load Dividend 


LD 


28 


P Field Address 


Q Field Address 




Load Dividend Immediate 


LDM 


18 


P Field Address 


Data 




Miltiply 


M 


23 


P Field Address 


Q Field Address 




Multiply Immediate 


MM 


13 

• 


P Field Address 

DTX02 Page 2 
PN 2172333 
EC t40U980 


Dato 







ODCD ATIO 


N CUDt^ 


OPERANDS 


■ 1 • A 

Indicators 


OPERATION 


Numeric 


Actual 


P Address 


Q Address 


Tested 


No Opera Hon 


NOP 


41 


Not Used 


Not Used 




Subtract 


S 


22 


R Field Address 


Q Field Address 




Set Flag 


SF 


32 


l,ocation to be Set 


Not Used 




Subtract Immediate 




12 


1^ Field Address 


'Data 




Transmit Digit 


TD 


25 


Transmit to 
Address 


Transmit from 
Address 




Transmit Digit Immediate 


TDM 


15 


Transmit to 
Address 


Digit at Ql 1 




Transmit Field 


TF 


26 


Transmit to 
Address 


Transmit from 
Address 




Transmit Field Immediate 


TFM 


16 


Transmit to 
Address 


Data 


• 


Transmit Record 


TD 
IK 


O 1 


Transmit to 

All 

Address 


Transmit from 

A. 1 1 

Address 




Dump Numerically Card 


DNCD 


35 


Data Address 


00400 




Dump Numerically Paper Tape 


i DNPT 


35 


Data Address , 


00200 




Dump Numerically Typewriter 


DNTY 


35 


Data Address 


00100 




Return Carriage Typewriter 


RCTY 


34 


Not Used 


00102 




Space Typewriter 


SPTY 


34 


Not Used 


00101 




Tabulate Typewriter 


TBTY 


34 


Not Used 


00108 




Read Alphamerically Card 
Read Alphamerically Paper To 


DA^n 
38 RAPT 


1*7 

37 


Input Data 
Address 
input Data 
Address 


00500 
UUoUU 




Read Alphamerically 
Typewriter 


RATY 


37 


Input Doto 
Address 


QUICK) 




Read Numerically 
Cord 


RNCD 


36 


input Dota 
Address 


00500 




Read Numerically 
Paper Tape 


RNPT 


36 

■ '. . 


input Data 
Address 
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EC mmo 


00300 





OPERATION CODES 



OPERANDS 



OPERATION 


vlumcric 


Actual 


P Address 


Q Address 


Read Numerically 
Typewriter 


RNTt 


36 


Input Data 
Address 


00100 


Write Alphamerically 
Card 


WACD 


39 


Output Data 
Address 


00400 


Write Alphamerically 
Paper Tape 


WAPT 


39 


Output Data 
Address 


00200 


Write Alphamerically 
Typewriter 


WATy 


39 


Output Data 
Address 


00100 


Write Numerically 
Card 


WNCD 


38 


Output Data 
Address 


00400 


Write Numerically 
Paper Tape 


WNPT 


38 


Output Data 
Address 


00200 


Write Numerically 
Typewriter 


WNTY 


38 


Output Data 
Address 


00100 



Indicators 
Tested 



ADH/pvb 
3/18/63 
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FN 2172333 
EC 140H980 



OT X02 
BASIC 1620-1 CPU TEST 



LINKAGE TO DTXOl 



0 1 18<» 










OORG 


1184 


01192 




00009 






DC 


9,4904208Q*tf 


04208 










OORG 


4208 


0A208 


49 


08000 


00000 




B 


8000 


07900 










UORG 


7900 










• 


DIPAL LmKAGE 


07901 




00004 






DAG 


4,DX02t 


07912 




00005 


J7998 




DSA 


17998 


079U 


45 


07938 


18117 


LINK 


BNR 


•♦24,IQL17 


07926 


49 


07962 


00000 




D 


• ♦36 


07938 


45 


01184 


07961 




BNR 


T24.5,**23 


07950 


49 


00440 


00000 




B 


440 


07962 


15 


07961 


00000 




TDM 


•-It f t 


07973 




OOOOl 






DC 


It'f • 


07974 


49 


18000 


00000 




B 


18000 



WILL BE THROWN AWAY IF LOADED lY UTXOI 



SET FLAG TO INEN DISK INPUT 



00000 DORG 8000 

• TEST THt BRANCH ON OVERFLOW AND BRANCH NO OVERFLOW 

• OPERATION, THE OVERFLOW INDICATOR IS TURNED ON BY 

• A COMPARE OPERATION USING A 2 DIGIT P AND A 3 DIGIT 0. 



08000 


14 


08008 


-0-00 


BVl CM 


•♦8f0,79 


f 


TURN ON OFLO IND 


08012 


46 


08036 


01400 


BV 


• + 2^, , , 




OFLO ON, SHOULD BRANCH 


08024 


17 


17332 


-8024 


BTM 


ERROR, t. 


f 


BV SHOULD HAVE BRANCHED 


08036 


47 


08060 


01400 


8NV 


•♦24, , , 




OFLO SHOULD HAVE BEEN RESET 


08048 


17 


17332 


-8048 


BTM 


ERROR,*, , 


BNV SHOULD HAVE BRANCHED 


08060 


47 


08084 


01900 


BNA 


♦♦2^, , 1 




TEST ANY DATA CHECK • 


08072 


17 


17332 


-8072 


BTM 


ERROR, f. 


t 


DATA CHECK ERROR 


08084 


46 


08000 


00200 


BC2 

• 


BVli,,, 




LOOP IF SW2 ON 


08096 


14 


08104 


-0-00 


8V2 CM 


•♦8,0,79 


t 


TURN ON OFLO IND 


08108 


47 


08132 


01400 


BNV 


•♦24, , , 




OFLO ON, SHOULD NOT BRANCH 


08120 


49 


08144 


00000 


B 


•♦24, , , 




GOOD 


08132 


17 


17332 


-8132 


BTM 


ERROR, •, 




BNV SHOULD NOT HAVE BRANCHED 


0fil4A 


46 


08168 


01400 


BV 


•♦24, , , 




OFLO SHOULD HAVE BEEN (^ESET 


08156 


49 


08180 


00000 


B 


•♦24,,, 




GOOD 


08168 


17 


17332 


-8168 


BTM 


ERROR, •, 


f 


BV SHOULD NOT HAVE BRANCHED 


08180 


47 


08204 


01900 ' 


BNA 


•♦24, , , 




TEST ANY DATA CHECK 


08192 


17 


17332 


-8192 


BTM 


ERROR, •, 


f 


DATA CHECK ERROR 


08204 


46 


08096 


00200 


BC2 


BV2,,, 




LOOP IF SW2 ON 



• THE NEXT SEQUENCE CHECKS THE SENSE/BRANCH DECODERS 
» THAT ONLY BV AND BNV OPERATIONS WILL RESET THE 

♦ OVERFLOW INDICATOR. 



08216 


14 


08224 


-0-00 


BV3 CM 


•♦8,0,79, 


TURN ON OFLO IND 


08228 


46 


08240 


01100 


61 


•♦12,1100,, 


SHOULD NOT RESET OFLO IND 


0 8240 


46 


08264 


01400 


BV 


•♦24,, , 


OFLO SHOULD BE ON 


08252 


17 


17332 


-8252 


BTM 


ERROR, •,, 


BV SHOULD HAVE BRANCHED 


08264 


47 


08288 


01900 


BNA 


•♦24,,, 


TEST ANY DATA CHECK 


08276 


17 


17332 


-82 76 


BTM 


ERROR, •, , 


DATA CHECK ERROR 
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08288 


46 


08216 


00200 


• 


BC2 


BV3t»t 


LOOP IF SW2 ON 


08 300 


14 


08308 


-0-00 


• 

BV4 


CM 


• 4-8t0t79t 


TURN ON OFLO IND 


08312 


46 


08324 


01500 




31 


•♦I2f 1500f f 


SHOULD NOT RESET OFLO INO 


0032A 


46 


08348 


01400 




BV 


•♦24f 1 1 


OFLO SHOULD BE ON 


08336 


17 


17332 


-8336 




BTM 




BV SHOULD HAVE BRANCHED 


08348 


47 


08372 


01900 




BNA 


•♦24f f t 


TEST ANY DATA CHECK 


08360 


17 


17332 


-8360 




BTM 


ERROR* *tf 


DATA CHECK ERROR 


08372 


46 


08300 


00200 


• 


BC2 


BV4f ft 


LOOP IF SW2 ON 


08384 


14 


08392 


-0-00 


• 

BV5 


CM 


•^8t0*79* 


TURN ON OFLO IND 


08396 


46 


08408 


01700 




Bl 


•♦12,f 1700t f 


SHOULD NOT RESET OFLO 


08408 


46 


0843? 


01400 




BV 


»'f24 II • • 


OFLO SHOULD BF ON 


08A20 


17 


17332 


-8420 




BTM 


ERROR t *t t 


BV SHOULD HAVE BRANCHED 


08432 


47 


08456 


01900 




BNA 


^ ' T f F 


TEST ANY DATA CHFCK 


08444 


17 


17332 


-8444 




BTM 


ERROR* •# t 


DATA CHECK ERROR 


08456 


46 


083R4 


00200 


• 


BC2 


BV5 * • • 


LCOP I F SW2 ON 


08468 


14 


08476 


-0-00 


• 

BV6 


CM 


• 4-8*0* 79 » 


TURN nw fiFi n iNn 


08480 


46 


08492 


02400 




BI 


•+12,2400* , 


SHOULD NOT RESET OFLO 


08492 


46 


08516 


01400 




BV 


•+24 • • • 


OFLO SHOULD BE ON 


08504 


17 


17332 


-8504 




BTM 


ERROR* • * » 


BV SHOULD HAVF BRANfHFn 


08516 


47 


08540 


01900 




. BNA 


• + 24 • • • 

* C ~ * *. f 


TEST ANY DATA THFTK 


08528 


17 


17332 


-8528 




BTM 


ERROR*** * 


DATA CHECK ERROR 


08540 


46 


08468 


00200 


• 


BC2 


BV6« • • 


LOOP IF <iW2 ON 


08552 


14 


08560 


-0-00 


• 

BV7 


CM 


♦+8*0t79* 


TURN ON OFLO IND 


08564 


25 


01400 


01400 




TD 


1400^1400, , 


SHOULD NOT RESET OFLO 


08576 


46 


08600 


01400 




BV 


• + 24 f * * 


OFLO SHOULD BE ON 


08588 


17 


17332 


-8588 




BTM 


ERROR***, 


BV SHOULD HAVE BRANCHED 


0860.0.47 


08624 


01900 




BNA 


♦ + 24 p , , 


TEST ANY DATA CHECK 


08612 


17 


17332 


-8612 




BTM 


ERROR* •* * 


DATA CHECK ERROR 


08624 


46 


08552 


00200 




BC2 


BV7*,, 


LOOP IF SW2 ON 



• THE FOLLOWING SECTION TESTS BI AND BNI OPERATION 

• USING THE HI/PLUS AND EQUAL/ZERO INDICATORS, THESE 

• INDICATORS ARE SET AND RESET WITH COMPARE IMMEDIATE 
» OPERATIONS. 



08636 


14 


08645 


OJIJO 


HZl 


CM 


•+9*lll0*8l0t 


TURN H/P ON AND E/Z OFF 


08648 


46 


08672 


01100 




BP 


»+24, * , 


SHOULD BRANCH ON H/P ON 


00660 


17 


17332 


-8660 




BTM 


ERROR,** * 


BP SHOULD HAVE BRANCHED 


08672 


46 


08696 


01300 




BNL 


•+24,,, 


BRANCH ON H/P OR E/Z ON 


08684 


17 


17332 


-8684 




BTM 


ERRORf»tt 


BNL SHOULD HAVE BRANCHED 


08696 


47 


08720 


01200 




BN2 


•+24,,, 


BRANCH ON E/Z OFF 


08708 


17 


17332 


-8708 




BTM 


ERROR,*,, 


BNZ SHOULD HAVE BRANCHED 


08720 


47 


08744 


01900 




BNA 


•+24*,, 


TEST ANY DATA CHECK 


08732 


17 


17332 


-8732 




BTM 


ERROR,*, , 


DATA CHECK ERROR 


08744 


46 


08636 


00200 


• 


BC2 


HZl,,, 


LOOP IF SW2 ON 


08756 


14 


08765 


0-0-0 


» ■ 
HZ2 


CM 


•+9*0,810, 


TURN H/P OFF AND E/Z ON 


08768 


46 


08792 


01200 




BZ 


»+24,,, 


BRANCH ON E/Z ON 


08780 


17 


17332 


-8780 




BTM 


ERROR,*,* 


BZ SHOULD HAVE BRANCHED 
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08792 


46 


08816 


01300 




BNL 


•♦24. 1 1 


BRANCH ON H/P OR E/Z ON 


0880A 


17 


17332 


-8804 




BTN 


E RROR ■ » • • 


BNL SHOULD HAVF HRANrHFn 


08816 


46 


08840 


01100 




BP 


•♦24t t f 


H/P OFF, BP SHOULDNT BRANCH 


08828 


49 


08852 


00000 




0 


• -f 2 4 t » f 


GOOD 


08840 


17 


17332 


-8840 




BTW 


ERROR » * 1 t 


BP SHOULDNT HAVE BRANCHED 


08852 


47 


08876 


01900 




BNA 


• 4-24 1 1 1 


TEST ANY DATA CHECK 


08864 


17 


17332 


-8864 




t)TM 


ERROR t * t t 


DATA CHECK ERROR 


08876 


46 


08756 


00200 


» 


||C2 


HZ2 • • • 


LOOP IF SU7 DN 


08888 


14 


08897 


OJOJl 


• 

HZ3 


QM 


• ■f 9* 10 L 1 •& 10 


• TURN BOTH H/P AND E/7 OFF 


08900 


47 


08924 


01300 






•♦24,,, 


BRANCH ON H/P AND E/Z OFF 


08912 


17 


17332 


-8912 




G|TM 


F RRGR . » • . 

<^ 1 A \J "www 


Rt *^HnUl n HAVE RRANirHFn 


08924 


46 


08948 


01300 




BNL 


• + 24, , , 


H/P AND E/Z OFF, SHOULDNT BRANCH 


08936 


49 


08960 


00000 

V/ \J \J \J \J 




Q 


•♦24, , , 


GOOD 


08948 


17 


17332 


-8948 




BTM 


ERROR,*, t 


BNL SHOULDNT HAVE BRANCHED 


08960 


47 


08984 


01900 




BNA 


♦♦24,, , 


TEST ANY DATA CHECK 


08972 


17 


17332 


-8972 




BTM 


ERROR, •• , 


DATA CHECK ERROR 


08984 


46 


08888 


00200 




BC2 


HZ3, ,, 


LOOP IF SW2 ON 














THE NEXT SEQUENCE OF TESTS CHECK MORE OF THE 












SENSE/BRANCH DECODERS. 












ALL OF THE FOLLOWING BNI OPERATIONS SHOULD BRANCH 


08996 


1 4 


\J ^ \J KJ J 


n 1 1 in 




CM 


• + 9, 1110,810 


, TURN H/P ON AND E/Z OFF 


09008 


4 7 


A c) 0 3 7 


n 1 7 n fi 




BNI 


• ♦24, 1700 




09020 


1 7 


17332 


- 9 0 2 0 




BTM 


ERROR, », , 




09032 


47 


09056 


01800 




BNI 


•♦24, 1800 




09044 


17 


17332 


-9044 




BTM 


ERRpR,«, , 




09056 


47 


090R0 


02 100 




BNI 


•♦24,2100 




09068 


17 


17332 


-9068 




BTM 


ERROR,*,, 




09;080 


47 


09104 


02300 




BNI 


•♦24,2300 




09b92>( 


17 


17332 


7 V/ 7 «. 




BTM 


ERROR, •,, 






47 


n Q 1 7 A 


U i 7 vj U 




BNA 


•♦24, , , 


TEST ANY DATA CK 




1 7 
1 f 


1 7 ^ 7 


7 l I O 




BTM 


ERROR, », , 


DATA CHECK ERROR 




4 A 
"to 


U O 7 7 O 






BC2 


DECl,,, 


LOOP IF SW2 ON 












THE FOLLOWING 


BNI OPERATIt)NS SHOULD BRANCH 


0 V 140 


t 4 


091 49 


V V 


npr 7 


CM 


•♦9,0,810, 


TURN H/P OFF AND E/Z ON 


09152 


47 


09176 


0 1 500 




BNI 


• ♦24 , 1500 




09164 


17 


17332 


-9164 




BTM 


ERROR, », , 




09 1 76 


47 


09200 


0 1600 




BNI 


•♦24, 1600 




09188 


17 


17332 


-9188 




BTM 


ERROR,*,, 




09200 


47 




07700 

\J C £. \J \f 




BNI 


•♦24,2200 




092 12 


17 


173 32 


— Q7 I 7 

7 I, ^ 




BTM 


ERROR,*, , 




097 74 


47 


W 7 •? O 


0 1 Qon 




BNA 


♦♦24, , , 


TEST ANY DATA CHECK 


\, w c. ~^ u 


1 7 


1 ( J .7 iL 


— 07 "^A 




BTM 


ERROR, *, , 


DATA CHECK ERROR 


w 7 t t O 


4 A' 


n Q 1 4 n 






BC2 


DEC2, , , 


LOOP IF SW2 ON 


09260 


17 


09284 


000-0. 


• 

BTl 


BTM 


•♦24,0 j 10, 


TWO SUCCESSIVE BTM UPNS TO CHECK 


09272 


41 


00000 


ocooo 




NOP 


» , » 


THAT IR2 IS CLEARED BY BT 


09284 


17 


09308 


000-0 




BTM 


*+24,0,10, 


IF NOT THERE SHOULD BE A MAR CHECK 


09296 


49 


09320 


00000 




B 


*+24, , • 


GO AHEAD, IT LOOKS GOOD 


09308 


42 


00000 


00000 




BB 






09320 


47 


09344 


01900 




BNA 


*+24 
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09332 


17 • 


17332 


-9332 




BTM 


ERRORt»t 1 


093AA 


46 


09260 


00200 


t , 


BC2 


BTli 1 » LOOP IF SW2 ON 


09356 


26 


09427 


09579 


• 
* 

BT2 


TF 


NOP+llfOHSff CLfcAR XMIT AREA 


09368 


27 


09428 


09585 




8T 


N0P+l2fRM,, TEST BT, 5 DIGITS AND RM 


09380 


43 


09404 


09421 




BO 


•♦24,N0P*5 


09392 


17 


17332 


-9392 




BTM 


ERROR, »,t 


0940^ 


49 


09524 


00000 




B 


ET,,, BT TEST COMPLETE 


09A16 


41 


00000 


00000 


NOP 


NOP 












• 
• 


BT BRANCHED HERE. TEST THE TRANSMISSION AND 










• 


SET UP THE DIGIT TO BE TESTED AFTER BRANCH BACK 


09^28 


45 


09476 


0M27 


• 


BNR 


•♦48,N0P*ll,f CHECK RM 


09A40 


43 


09464 


09426 




nn 




09452 


49 


09476 


00000 




B 


•♦24,,, 


0946'* 


43 


09500 


09422 








09A76 


17 


17332 


-9476 




BTM 


ERROR,*,, 


09488 


49 


09524 


00000 




B 


ET,,, SKIP REST OF TEST 


09500 


25 


09421 


09424 




Tn 




09512 


42 


00000 


00000 




u n 

o u 




0952A 


47 


09548 


01900 




n Ki A 

UNA 


a .a. 7 A. 
• ♦ t *, 


09536 


17 


173 32 


-9536 




DIM 




095A8 


46 


09356 


00200 




ur 5» 


b i £ , , , LUUr 


09560 


49 


09586 


00000 




a 
O 












» 

» DATA 


c no 
r UK 




09?79 




00008 




« 

OHS 


DC 


8,0,, 8 ZEROS 


09584 




00005 






DC 


5,19375 


09585 




00001 




RM 
• 


DC 


1,' 










• 
• 




IF WE REACHED THIS POINT WITHOUT AN ERROR, AT,L 














TRANSMIT AND BRANCH OPERATIONS WORKED CORRECTLY. 










• 




THEREFORE WE PROCEED INTO THE ARITHMETIC TEST USING - 










• 




THE AFOREMENTIONED OPERATIONS TO CHECK FOR CORRLCT 










• 

• 




RESULTS 










• 
» 




THIS SECTION TESTS THE COMPARE OPERATION FOR CORRECT 














OPERATION OF ALL PROGRAMMABLE INDICATORS. 


09586 


17 


16926 


-9586 




BTM 


CLEAR,*,, GO TO RESET ALL INDICATORS 














TEST COMPARE OPERATION 


09598 


16 


17130 


K089J 


COMO 


TFM 


W0RK,2089l,7ll,SET P FLO FOR FIRST COMPARE 


09610 


16 


09686 


K089J 




TFM 


COMW, 20891,711, SET, P FLO FOR SECOND COMPARE 


09622 


14 


17130 


K089J 




CM 


WORK, 20891, 711, COMPARE EQUALS 


09634 


24 


09686 


17130 




C 


COMW, WORK,, SEE IF P FIELD WAS MODIFIED 


09646 


17 


16038 


-9687 




BTM 


TEST,CC0M0-4,, GO TEST INDICATORS 


09658 


46 


09598 


00200 




BC2 


COMO, , , LOOP IF SW2 ON 


09670 


49 


097G0 


00000 




B 


COMl,,, 










• TESTOATA 


09686 




00005 




COMW 


OC 


5,0», P FIELD FOR SECOND COMPARE 
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09691 




00005 


'-9S98 


rrciMo 

\0 \0 w I I \J 


U J M 


COMO 




09695 




00004 






DC 


4 ■ 01 00 • a 


INIIIfATriR^ 


09697 




00002 






OC 


2 tOO t • 

C f WW f f 


FLD LFNHTH flF AN<iUPR 

r«.w LW'^wvn wf Mi^^ffC*^ 


09698 




OOOOl 




% 


DC 


» f ft 


RFCnRD MARK 










• 
• 




TEST COMPARE 


OPERATION 


09700 


16 


17130 


000-0 


COMl 


TFM 


UQRK.O. 10* 


SET P FLD 


09712 


14 


171 30 


000-0 




CM 


WORK (O* 10* 

T¥ W 0'>yw^ m V V 


COMPARE 00 AND 00 

WWIf'^IA^WwMl^l/VW 


09724 


17 


16038 


-9760 




BTM 


TEST .CCOMl- 


4«« GO TO TEST INDtCATOR^ 


09736 


46 


09700 


00200 




BC2 


COMl,,, 


LOOP IF SW2 ON 


09748 


49 


09772 


00000 




B 


COM I A 












• TESTOATA 






09 764 




00005 


— Q 700 


CCOMl 


DSA 


r f )M t 




09 768 










DC 


A . n 1 nn . » 


t Mli T r A TDD 


09770 




00002 






DC 


C , u , , 




097 71 




0000 I 

V W V/ V Ik 




• 


UC 


At. ft 












• 
• 






nPTR ATI nw 


09 7 72 


16 


17130 


(300 — 


COMIA 


TFM 


WdRK . n . 1 0 1 1 


« C F T P F 1 n 


09 784 


14 


17130 


00-00 




CM 


MURK . 0 > 9 . 


rnMPARF —DO AND *nctn 


09796 


1 7 


16038 


-98 32 




BTM 






09808 


46 


09772 


00200 




BC2 


CUMIA, ,, 


LOOP IF SW2 ON 


09820 


49 


09844 


00000 

\s \S w w \S 




B 














• TESTOATA 






09 8 36 








CCOMIA 


DSA 


u u n 1 A 




09840 




00004 






DC 


4^ni in.- 


1 wn 1 r A Tnsj c 


09842 




00002 






DC 


c , UU , f 


CI n 1 CMPTu nc akicucd 
rLl) LtNOiri Ur AIMbWcK 


09843 




nono 1 




» 


OC 


1 . t . 


DCPnonMADV 
KtUUKU nAKI\ 










• 
• 




itif uunrAKt 


Ur t K A 1 1 UN 


09844 


c u 


171^0 


VJ 7 U J 


COM2 


TF 


Uf1D K r DO 


c n T o c 1 n 


09856 


24 


17130 


09908 




C 


nUrvIS tV>\W<L , , 


PriMDADC Ain Amu —f\nn occct 
t.UrlrAKt ▼lU ANU — OvU, KcbcT 


09868 


1 7 




— 9909 




BTM 


1 1: o 1 , ».< v»UH t— 


>A rn Tc^T TMrttPATnoc 


09880 


46 


09844 


00200 




BC2 




1 nnp I F «vw a nw 


09892 


49 


09922 


00000 

\s \J \J \J \M 




B 














• TESTOATA 






09905 




00002 




CP2 


OC 


2.10,, 


P 


09908 




00003 




CQ2 


DC 


3,-000,, 


vl 


0991 3 




00005 


-9644 


CC0M2 


DSA 


COM2 




099 1 7 




00004 






DC 


4,1000, , 


1 Nn 1 r ATnp ^ 


09919 




00002 






DC 


2,0, , 


Fi n 1 CMTTu nc amcucd 


09920 




0000 1 




• 


OC 


I . • f f 


KtUUKU nAKIS 










• 


TEST COMPARE 


noCD AT iriM 
Ur t KA 1 1 UN 


09922 


26 


17130 


09983 


COM3 


TF 


W0RK,CP3, , 


ccT p Fi n 


09934 


24 


17130 


09986 




C 


W0RK,CQ3,, 


COMPARE -00 AND ♦010, RESET 


09946 


17 


16038 


-9987 




BTM 


TEST,CC0M3- 


4,, GO TEST INDICATORS 


09958 


46 


09922 


00200 




BC2 


C0M3,,, 


LOOP IF SW2 ON 


09970 


49 


10000 


ooboo 




B 


COM4 












» TESTOATA 






09983 




00002 




CP3 


OC 


2,-00,, 


P 
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39986 
59991 
39995 
39997 
39998 



00003 

00005 -9922 
00004 
00002 
00001 



CQl 

ccon3 



oc 

OSA 
DC 
DC 
OC 



3f010t* 

COM3 

4ff0000»t 
2f0tt 
ItS t 



INDICATORS 

FLO LENGTH OF ANSWER 
RECORD MARK 



lOOOO 26 17130 10062 

10012 24 17130 10064 

10024 17 16038 J0065 

10036 46 10000 00200 

10048 49 10078 00000 



10062 00003 

10064 00002 

10069 00005 JOOOO 

10073 00004 

10075 00002 

10076 00001 



COM4 



TE5T COMPARE 
TF W0RK,CP4,, 
C W0RK,CQ4,, 
BTM fEST,CC0M4- 
BC2 COM4,,, 
8 C0M5 



• TESTOATA 



CP4 
CQ4 
CC0M4 



OC 

DC 

USA 

DC 

DC 

OC 



3,-100» » 
2tOO, V 

COM4 

4,0000f , 
2t0, , 



OPERATION 
SET P FLO 

COMPARE-100 AND ♦OO 
•4,, GO TEST INDICATORS 
LOOP IF SM2 ON 



INDICATORS 

FLO LENGTH OF ANSWER 
RECORD HARK 



10078 26 17130 10140 

10090 24 17130 10143 

10102 17 16038 J0144 

10114 46 10078 00200 

10126 49 10156 00000 



10140 0C003 

10143 00003 

10148 00005 J0078 

10152 00004 

10154 00002 

10155 00001 



• TEST COMPARE OPERATION 

C0M5 TF M0RK,CP5,, SET P FLD- 

C W0RK,CQ5,, COMPARE -383 AND -372 
BTM TEST,CC0M5-4,, GO TEST INDICATORS 
BC2 C0M5,,, LOOP IF SW2 ON 

B C0M6 



• TESTOATA 



CP5 
CQ5 
CC0M5 



DC 

DC 

DSA 

DC 

DC 

OC 



3,-383,, 
3,-372,, 
C0M5 

4,0000, , 
2,0, , 



INDICATORS 

FLD LENGTH OF ANSWER 
RECORD MARK 



10156 26 17130 10217 

10168 24 17130 10220 

10180 17 16038 J0221 

10192 46 10156 00200 

10204 49 10234 00000 



10217 00002 

10220 00003 

10225 00005 J0156 

10229 00004 

10231 00002 

10232 00001 



C0M6 



TF 
C 

BTM 
BC2 
B 



TEST COMPARE OPERATION 

SET P FLD 

♦10 AND -372, END OP TR12 ON SECOND CYCLE 
4,, GO TEST INDICATORS 
LOOP IF SW2 ON 



TESTOATA 
DC 
DC 



CP6 
CQ6 
CC0M6 



DSA 
OC 
OC 
DC 



W0RK,CP6,9 
W0RK,CQ6, 9 
TEST,CC0M6- 
C0M6 , , , 
C0M7 



2,10, , 

3, -372,9 
C0M6 

4, 1000, 9 
2,0» 9 



INDICATORS 

FLO LENGTH OF ANSWER 
RECORD MARK 



10234 26 17130 10295 
10246 24 17130 10297 
102S8 17 16038 J0298 



» 

C0M7 



TEST COMPARE 
TF W0RK,CP7,t 
C WQRK,CQ7,9 
BTM TEST,CC0M7- 



OPERATION 
SET P FLD 

COMPARE ♦SO AND -50 
49 f GO TEST INDICATORS 
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10270 hb 10234 00200 
10282 49 L0310 00000 



10295 
10297 
10302 
10306 
10308 
10309 



00002 
00002 

00005 J0234 
00004 
00002 
OOOOl 



BC2 
B 

TESTOATA 
DC 
DC 
DSA 
DC 
DC 
DC 



CP7 
CQ7 
CC0H7 



C0H7f ft 
COHB 



2t50,, 

2.-50,, 

C0M7 

4,1000,, 
2,0, • 
l.*t. 



LOOP IF SW2 ON 



INDICATORS 

FLO LENGTH OF ANSWER 
RECORD HARK 



10310 26 17130 10371 

10322 24 17130 10374 

10334 17 16038 J0375 

10346 46 10310 00200 

10358 49 10388 00000 



COMB 



TF 

C 

BTM 
RC2 
B 



TEST COMPARE OPERATION 
W0RK,CP8,, SET P FLO 
W0RK,CQ8,, COMPARE -70 AND -770 
TEST,CC0M8-4,, GO TEST INDICATORS 



C0M8,,, 
C0M9 



LOOP IF SN2 ON 



10.371 
10374 
10379 
10383 
10385 
10386 



00002 
00003 

00005 Jti310 
00004 
00002 
00001 



• TESTOATA 



CP8 
CQ8 
CC0M8 



DC 

DC 

DSA 

DC 

DC 

DC 



2,-70,, 
3i-770,, 

CQM8 

4,0110,, 

2,0,, 

ItSt 



INDICATORS 

FLO LENGTH OF ANSMER 
RECORD MARK 



10388 26 17130 10449 

10400 24 17130 10452 

10412 17 16038 J0453 

10424 46 10388 00200 

10436 49 10466 00000 



» 

C0M9 



TF 
C 

BTM 
BC2 
B 



TEST COMPARE OPERAflCN 
W0RK,CP9e, SET ♦ FLO 
W0RK,CQ9,, COMPARE-70 AND -760 
TEST,CC0M9-4,, GO TEST INDICATORS 



C0M9,,, 
COMIO 



LOOP IF SW2 ON 



10449 
10452 
10457 
10461 
10463 
10464 



• TESTOATA 



00002 
00003 

00005 J0388 
00004 
00002 
00001 



CP9 
CQ9 
CC0M9 



DC 

DC 

DSA 

DC 

DC 

DC 



2, -70,, 

3, -760, , 

C0K9 

4,0010, , 
2,0,, 
1,'f f 



P 
Q 

INDICATORS 
FLO LENGTH OF 
RECORD MARK 



ANSWER 



10466 26 17130 10535 

10478 24 17130 10535 

10490 17 16038 J0536 

10502 46 10466 00200 

10514 49 10S48 00000 



• TEST COMPARE OPERATION 

COMIO TF W0RK,CPQ10,, SET P FLO 

C W0RK,CPQ10«, TEST THAT ALL DIGITS WILL COMPARE EQUAL 

BTM TEST,CC0M10-4«,G0 TEST INDICATORS 

BC2 COMIO,,, LOOP IF SW2 ON 

B COMU 



10535 
10540 
10544 
10546 
10547 



000 10 

0000!i J0466 
00004 
00002 
00001 



• TESTOATA 
CPQIO DC 
CCOMIO DSA 
DC 
DC 
DC 



I 0,01 23456789 AND Q FLOS 
COMIO 

4,0100,0 INDICATORS 

2,0,, FLO LENGTH OF ANSWER 



f 9 



RECORD MARK 



DTX02 



FN 2172333 



EC UOUQBO 
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♦ TEST COMPARE OPERATION 



10548 


26 


17130 


10612 


COHll 


TF 


WORK, CPU ft 


SET P FLO 




10360 


24 


17130 


10617 




C 


WORKfCOUt* 


COMPARE ^69530 ANO ♦96305 




10572 


17 


16038 


J0618 




BTM 


TEST,CC0Mll-4 


•,G0 TEST INDICATORS 




10584 


46 


10548 


00200 




BC2 


COMl 1 « 1 , 


LUUr Ir dNZ ON 




10596 


49 


10630 


00000 




0 


A0TBL-12ttt 


GO TO ADO TABLE TEST 












• TESTOATA 








10612 




00005 




CPU 


oc 


5,69530, t 


P 




10617 




00005 




CQll 


DC 


5,9630'tt 


Q 




10622 




00005 


J0548 


CCOMll 


OSA 


COMll 






10626 




00004 






OC 


4,6ooo,, 


INDICATORS 




10628 




00002 






OC 


2f0ff 


FLO LENGTH OF ANSWER 




10629 




OOOOl 




• 
• 
• 


OC 


IfS* 


RECORD MARK 












• 

• 
• 
• 
• 


ADD TABLE TEST 














• 




THIS ROUTINE TESTS ALL THE POSITIONS OF THE ADO TABLE FOR 










• 


CORRECIF DIGITS 


ANO ADDRESSING. IT DOES NOT CHECK 












• 


FOR FLAGSt THAT 


IS DONE IN A LATER TEST. 




10630 


1 7 


16926 


J0630 


• 


BTM 


CLEAR,*,, 


CLEAR WORK AREA 




10642 


16 


10713 


000-0 


• 

AOTBL 


TFM 


0,0, to. 


START WITH Q«00 




10654 


31 


17100 


10834 




TR 


17100, TBL,, 


PUT CONSTANT TABLE IN 17100-17118 




10666 


26 


10701 


17100 


SETP 


TF 


P, 17100,, 


SET P FIELD FROM HI ORDER PUS OF CONSTANT 


10678 


21 


10701 


10713 




A 


PtQ»t 


TEST THE ADD OPERATION 












• 
• 




THE NEXT 4 INSTRUCTIONS PERFORM A TABLE LOOKUP 












• 




FUNCTION TO CHECK FOR CORRECT SUM. 




10690 


15 


10737 


00000 




TDM 


TSUM+11,0,, 


TRANSMIT UNITS HOS OF SUM TO Oil OF 


BO INST 


10701 




00002 




P 


DC 


2,0, », 


USE 010,11 OF TDM AS P FLO 




10702 


25 


10720 


17100 




TO 


DEF4^6, 17100,, 


TRANS Q DIGIT TO P6 OF TR INSTRUCTION 


10713 




00002 




Q 


OC 


2,0, •, 


USE Q10,11 OF TO AS Q FLO 




10714 


31 


G0070 


10834 


OEF 


TR 


70, TBL,, 


TRANSMIT CONSTANT TABLE TO LOCITO^Q 


DIGIT} 


10726 


43 


17532 


00080 


TSUM 


BO 


WRONG, 80,, 


WILL BE ZERO IF SUM CORRECT 




10738 


47 


10762 


01900 


• 


BNA 


•♦24,,, 


TEST FOR DATA CHECK 




10750 


17 


17332 


J0750 




BTM 


ERROR,** , 


DATA CHECK ERROR 




10762 


46 


10666 


00200 




BC2 


SETP,,, 


LOOP IF SW2 ON 












• 




THE CONSTANT TABLE IS SHIFTED LEFT ONE POSITION 
















TO INCREASE P BY U AFTER P IS INCREASED FROM 0-9t 
















Q IS INCREASED 


BY ONE ANO P GOES FROM 0-9 AGAIN* 




10774 


31 


17100 


17101 




TR 


17100,17101,, 


SHIFT IN NEXT DIGIT TO TEST 




10786 


45 


10666 


17109 




Bm 


SETP,17109«, 


RM SAYS FINISHED FOR THIS Q DIGIT 




10798 


11 


10713 


000- 1 




AM 


QtUlO, 


INCREASE Q DIGIT BY 1 




10810 


43 


10654 


10713 




BO 


ADTBL^12»0,, 


START OVER WITH NEW Q OIGtT.UNTIL Q 


EXCEEDS 


10822 


49 


10854 


00000 




B 


AD I- 12 






10834 




00020 




TBL 


OSC 


20,01234S67890l234S67eSt CONSTANTS FOR TEST 





ff 
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• THIS SECTION TESTS THE E TIME AND AUX TRIGGER CIRCUITRY ASSOCIA 











» WITH 


OP 1 


CODES 11 AND 


21. 




10854 


17 


16926 


J0854 




BTM 


CLEAR,*, ♦ 




RESET INDICATORS AND CLEAR WORK AREA 










• 


TEST ADD OPERATION 


10866 


16 


I 71 30 


000-0 


ADl 


TFM 


WORK,0, lOi 




SET P : 


10878 


11 


17130 


000-0 




AM 






Ann 7FRn TO 7FRn 


10890 


1 7 


16038 


J0926 




BTM 


TEST, CADI- 


4,, 


TEST SUM AND INDICATORS 


10902 


46 


10866 


00200 




QC2 


ADl,,, 




LOOP IF SW 2 ON 


109 14 


49 


1 0940 


00000 

W W W w w 




Q 


AD2 














• TESTDATA 








10930 




00005 
\f \/ \j \f ^ 


inn A A 

w V/ O O O 


CAOl 


DSA 


ADl 






10934 




00004 

\J \J \J \J T 






DC 


4,0100f , 




INDICATOR PATTERN 


A VI 7 ^ O 




OOOOP 






DC 


2,02, , 




FLD LENGTH OF ANSWER 


4 W 7 ^ O 




VJ \J\J £. 






DC 


2,00, , 




ANSWER 


10939 




00001 




• 


DC 


lt*.f 




RECORD MARK 










• 
• 


TEST ADD OPERATION 


10940 


16 


171 30 


OOONO 


A02 


TFM 


WORK, 50, 10 


ff 


SET P 


10952 


1 1 


171 30 


OOONO 




AM 


WORK, 50, 10 


t 


50+50 SHOULD BE ZERO WITH OVERFLOW 


10964 


17 


16038 


J 100(1 




BTM 


TEST,CAD2- 


4,, 


TEST SUM AND INDICATORS 


10976 


46 


10940 


00200 




BC2 


AD2? ,, 




LOOP IF SW2 ON 


10988 


49 


11014 


00000 




B 


AD3 














♦ TESTDATA 








1 1004 




00005 


J0940 


CAD2 


DSA 


A02 






1 1008 




00004 






DC 


4,0110,, 




INDICATORS 


1 1010 




00002 






DC 


2.02,, 




FLD LENGTH OF ANSWER 


1 1012 




00002 






DC 


2,00,, 




ANSWER 


1 1013 




00001 




• 


DC 


1 . f f « 




RECORD MARK 










• 
• 




TEST ADD OPERATION 


11014 


16 


171 30 


OOONO 


A03 


TFM 


WORK, 50, 10 


t 


SET P 


1 1026 


1 1 


171 30 


OOONO 




AM 


WORK, 50, 10 


t 


50*50+50 EQUALS 50 WITH OVERFLOW 


11038 


1 1 


1 71 30 


OOONO 




AM 


WORK, 50, 10 


, 




1 1050 






w 1. V O O 




BTM 


T£ST,CAD3- 


4,, 


TEST SUM AND INDICATORS 


11062 


46 


11014 


00200 




BC2 


AD3, ,, 




LOOP IF SW2 ON 


1 1074 


49 


I 1 1 00 


00000 




B 


AD4 














w 

» TESTDATA 








1 1 090 




00005 
^J^J^J\J J 


J I O 1 4 


CA03 


DSA 


AD3 






1 1094 




00004 






DC 


4,1010,, 




INDICATORS 


1 1096 




00002 






DC 


2,02,, 




FLD LENGTH OF ANSWER 


1 1098 




00002 






DC 


2,50,, 




ANSWER 


11099 




00001 




* 


DC 


If *t f 




RECORD MARK 










* 
• 


TEST ADD OPERATION 


11100 


16 


17130 


OOJOO 


A04 


TFM 


WORK, 100,9 


t 


SET P 


11112 


11 


17X30 


OOKOO 




AM 


WO^K,200,9 


t 


ADD 100 + 200 = 300 


11124 


17 


16038 


J 1160 




BTM 


TEST,CAD4- 


4,, 


TEST SUM AND INDICATORS 


11136 


46 


lUOO 


00200 




BC2 


AD4,,, 




LOOP IF SW2 ON 


11148 


49 


11^76 


oopoo 




B 


AD5 














• TESTDATA 








11164 




00005 


JIIOO 


CAD4 


DSA 


AD4 






1II68 




00004 






DC 


4,1000, , 




INDICATORS 
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IU70 00002 
11173 00003 
111 74 .00001 



DC 
DC 
OC 



2,03, ♦ 
3,300,, 
I » * , , 



FLO LENGTH OF ANSWER 

ANSWER 

RECORD MARK 



TEST ADD OPERATION 



11176 


16 


17130 


R7531 


ADS 


TFM 


WORK, 97531,, SET P 


I 1188 


11 


17130 


A753J 




AM 


WORK, 97531, 711, SHOULD GET ZERO ANSWER 


11200 


17 


16038 


J1236 




BTH 


TEST,CA05-4,, TEST SUM AND INDICATORS 


11212 


46 


11176 


00200 




BC2 


AD5,,, LOOP IF SW2 ON 


11224 


49 


11254 


00000 




a 


A 06 










• TESTDATA 




11240 




00005 


J1176 


CA05 


DSA 


AD5 


11244 




C0004 






DC 


4,0100,, INDICATORS 


11245 




00002 






DC 


2,05,, FLD LENGTH OF ANSWER 


11251 




00005 






DC 


5,00000,, ANSWER 


11252 




00001 




• 


OC 


1,*,, RECORD MARK 










• 
• 


TEST ADD OPERATION 


1 1254 


26 


17130 


11316 


A06 


TF 


W0RK,AP6, , SET P 


1 1266 


21 


17130 


11322 




A 


W0RK,AQ6,, ACD 3 DIGIT P TO 6 DIGIT Q 


11278 


17 


16038 


J1323 




BTM 


TEST,CAD6-4, , TEST SUM AND INDICATORS 


11290 


46 


11254 


00200 




BC2 


AD6,,, LOOP IF SW2 ON 


11302 


49 


11338 


00000 




B 


AD7 










• TESTDATA 




11316 




00003 




AP6 


DC 


3,636,, P 


11322 




00006 




AQ6 


DC 


6,999347,, Q 


11327 




00005 


J 1254 


CAD6 


DSA 


AD6 


11331 




00004 






DC 


4,1010,, INDICATORS 


11333 




00002 






DC 


2,03,, FLD LENGTH OF ANSWER 


11336 




00003 






DC 


3,983, , ANSWER 


11337 




00001 






DC 


1,« , , RECORD MARK 










• 

♦ 


TEST ADD OPERATION 


11338 


26 


17130 


11407 


AD7 


TF 


WORK, APT, , SET P 


11350: 


21 


17130 


11417 




A 


W0RK,AQ7,, -P,+Q NO RECOMP CYCLE 


1 1362 


17 


16038 


J1418 




BTM 


TEST,CAD7-4, , TEST SUM AND INDICATORS 


1.1374 


46 


11338 


00200 




BC2 


AD7, , , LOOP IF SW2 ON 


11386 


49 


11440 


00000 




B 


AD8 










w 

» TESTDATA 




11407 




00010 




APT 


DC 


10,-0497635401,, P FLD 


11417 




00010 




A07 


DC 


10,0389473526,, Q FLD 


11422 




00005 


J 1338 


CA07 


DSA 


AD7 


11426 




00004 






DC 


4,0000, , INDICATORS 


11428 




C0002 






DC 


2,10,, FLD LENGTH OF ANSWER 


11438 




00010 






DC 


10,-0108161875,, ANSWER 


1 1439 




00001 




» ■ 


DC 


l,»,, RECORD MARK 










■ • ■ ■ 
» 


TEST ADD OPERATION 


11440 


26 


17130 


11509 


AD& 


TF 


W0RK,AP8,, SET P 


11452 


21 


17130 


11519 




A 


W0RK,AQ8,, -P,*Q TAKE A RECOMP CYCLE 


11464 


17 


16038 


J 1520 




BTM 


TEST, CAD8-4,, TEST SUM AND INDICATORS 


11476 


46 


11440 


00200 




BC2 


AD8, , , LOOP IF SW2 ON 



DTX02 



PN 2172333 



EC 404980 



1 1A88 


49 


11542 


00000 




B 


AD9 










• TESrOATA 




U509 




00010 




AP8 


DC 


10t-4793853206« • P FLO 


11519 




00010 




AQ8 


be 


10*6375944001f , Q FLO 


11524 




00005 


J1440 


CA08 


OSA 


A08 


11528 




00004 






DC 


4,1000tt INDICATORS 


11530 




0C002 






DC 


2,10t» FLO LENGTH OF ANSWER 


1 1540 




00010 






DC 


I0,l582090795tf ANSWER 


1 1541 




00001 




• 


DC 


ItSt RECORD MARK 










• 

• 


TEST ADD OPERATION 


1 1542 


26 


17130 


11610 


A09 


TF 


WGRK,AP9t» SET P 


1 1554 


21 


17130 


11617 




A 


W0RK,AQ9,, USES ALL COMBINATIONS FOR 


11566 


17 


16038 


J1618 




BTM 


TeSTfCAD9-4f t AND CARRY OUT CIRCUITS 


11578 


46 


I 1542 


00200 




BC2 


A09»»» LCOP IF SW2 ON 


11590 


49 


1 1640 


00000 




B 


AUlOtit 










• T6STDATA 




11610 




00009 




AP9 


DC 


9,005l76448t t P FLD 


11617 




00007 




AQ9 


DC 


7, 6063454,, QFLD 


1 1622 




0C005 


J1542 


CAD9 


OSA 


AU9 


1 1626 




GC004 






DC 


4,1000,, INDICATORS 


1 1628 




00002 






DC 


2,09,, FLO LENGTH OF ANSWER 


U637 




0C009 






OC 


9,011239902,, ANSWER 


11638 




00001 




• 


DC 


1 , * , t RECORD MARK 










• 




TEST ADD OPERATION 


1 1640 


26 


17130 


1 1706 


ADIO 


TF 


WCRK.AP10»« SET P 


1 1652 


21 


17130 


11713 




A 


WCRK,A010,, ♦P.-O TAKE RECOMP CYCLE 


11664 


17 


16038 


J1714 




BTM 


TEST,CADlO-4,, TEST SUM AND INDICATORS 


1 1676 


46 


1 1640 


00200 




BC2 


Anifl*.. 1 onp IF <iU7 fiN 


1 1688 


49 


11734 


00000 




6 


Anil... 










» TESTOATA 




11706 




00007 




APIO 


DC 




11713 




00007 




AQIO 


DC 


7,-3839978,, 0 FLD 


11718 




00005 


J1640 


CADIO 


DSA 


AOlO 


11722 




00004 






DC 


4,0000,, INDICATORS 


1 12^ 




00002 






DC 


2,07,,, FLD LENGTH* OF ANSWER 


11731 




00007 






DC 


7,-2899448,, ANSWER 


11732 




00001 




• 


DC 


1,',, . RECORD MARK 


1 1734 








• 
* 




TEST ADD OPERATION 


26 


17130 


1 1803 


AOU 


TF 


WORK, APll,, SETP 


1 1746 


21 


17130 


11813 




A 


WORK,AQll,, ♦P,4-Q NO OVERFLOW 


1 1758 


17 


16038 


J1814 




BTM 


TEST,CADll-4, , TEST SUM AND INDICATORS 


1 1770 


46 


11734 


00200 




BC2 


ADll, ,, LCOP IF SW2 DN 


11782 


49 


11836 


00000 




B 


^D12 










• TESTOATA 




1 1803 




OOOlO 




APll 


DC 


10,1357924680,, P FLD 


11813 




00010 




AQII 


OC 


10,7460135829, t 0 FLD 


11818 




00005 


J1734 


CAOll 


DSA 


ADll 


11822 




00004 






DC 


4, 1000, • INDICATORS 


11824 




00002 






DC 


2,10,> FLD LENGTH OF ANSWER 










DTX02 




PN 2712333 EC MOMDSO Page 



11834 




00010 






DC 


lOtBB 18060509* • ANSWER 


11835 




OOOOl 






OC 


1 • * * i RECORD MARK 










• 
• 




TEST ADD OPERATION 


11836 


26 


17130 


11905 


A012 


TF 


W0RK,APl2tf SET P 


1 1648 


21 


17130 


11911 




A 


W0RK*AQ12tt -Pf-Q P FLO GREATER 


1 1860 


17 


16038 


J1912 




BTM 


TEST,CAD12-4,, TEST SUM AND INDICATORS 


U872 


46 


11836 


00200 




BC2 


AD12fft LCOP IF SW2 ON 


11884 


49 


11934 


00000 




B 


AD13,,, 










w 

• TESTD/I^TA 




1 1905 




OOOlO 




AP12 


OC 


10,-2148105219, t P 


1 19L 1 


\ 


00006 




AQ12 


DC 


6,-362718,, Q 


11916 




00005 


J1636 


CAD12 


DSA 


AD12 


11920 




00004 






OC 


4,0000,, INDICATORS 


1 1922 




00002 






DC 


2,10,, FLO LENGTH OF ANSWER 


1 1932 




OOOlO 






OC 


10,-2148467937,, ANSWER 


11933 




OOOOl 




• 


DC 


1 , • , » RECORD MARK 










« 




TEST ADD OPERATION 


11934 


26 


17130 


11999 


AD13 


TF 


W0RK,AP13,, SET P 


1 1946 


21 


17130 


12005 




A 


W0RK,AQ13,, -»-P,-Q NO RECOMP CYCLE 


11958 


17 


16038 


J2006 




BTM 


TEST,CA0l3-4, , TEST SUM AND INDICATORS. 


1 1970 


46 


1 1934 


00200 




BC2 


AD13, , , LOOP IF SW2 ON 


1 1982 


49 


12024 


00000 




B 


AD14 










• TESTDATA 




11999 




00006 




AP13 


DC 


6,831246,, ? 


1'2005 




00006 




AQ13 


DC 


6,-652739,, Q 


12010 




00005 


J1934 


CAD13 


DSA 


A0I3 


12014 




00004 






DC 


4, 1000, • INDICATORS 


12,016 




00002 






DC 


2y06,, FLD • ENGTH OF ANSWER 


12022 




00006 






DC 


6iil78507a« ANSWER 


12023 




OOOOl 






DC 


i,*,t RECORD MARK 










» 




THE NFXT 3 ROUTINFS TF<iT«l THF Ann TARI P TO 










• 




MAKE SURF ALL THF Fl AAS ARF THFDF 


12024 


26 


17130 


12098 


• 

A014 


TF 


W0RKtAPl4«* SET P 


12036 


21 


17130 


12113 




A 


WCRK*A014*« ADD TABLF Pfl*^ "^fl?— '^QQ.FxrFPT 


12048 


17 


16038 


J2114 




BTM 


TEST,CAD14-4,, TEST SUM AND INDICATORS 


12660 


46 


12024 


00200 




BC2 


AD14*tt LOOP IF SW2 ON 


12072 


49 


12142 


00000 




e 


AD15 










w 

• TESrOATA 




12098 




00015 




AP14 


DC 


15,123456789234567,, P 


12113 




00015 




AQ14 


DC 


15,880888888777778,, Q 


12118 




00005 


J2024 


CA014 


DSA 


AD14 


12122 




00004 






DC 


4,1010,, INDICATORS 


12124 




00002 






DC 


2,15,, FLD LENGTH OF ANSWER 


12139 




00015 






DC 


15,012345678012345,, ANSWER 


12140 




OOOOl 






DC 


I, St RECORD MARK 










♦ 


TEST ADD OPERATION 
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12142 


26 


17130 


12216 


AD15 


TF 




12154 


21 


17130 


177 31 

4 C £ J 4 




A 


unotf Ante APn taqi c i^a ^*tn 
NUKlv.f AU ID f t ALU TAdLc 364—379 


12166 


17 


16038 


J2232 




BTH 


T P ^ T < f An 1 . . TCCT Cliu AAin tAint/*ATnBe 
1 c o 1 (l^ AUi?"**! ff t icol oUn ANU INDICpAiURs 


12178 


46 


12142 


00200 




BC2 


ADlSaaa IHnP tP 9 nM 
i**J V J ^ % % kUUr XT dNC. Ufl 


12190 


49 


12260 


00000 

w w w w w 




B 












w 

• TESTOATA 




12216 




00015 




APIS 


DC 


15, 893456789456789,, P 


12231 




00015 




AQ15 


DC 




12236 




00005 


J2142 


CA015 


OSf 


Am <: 


12240 




00004 






DC 


*ttiUlUtt I iMU 1 1, A 1 UK a 


12242 




00002 






DC 


9.tt>. CI n i CMPTU nc aaicuco 
«t49,, rLU LtOK^In Ur ANaNcR 


12257 




onoi 5 

V U V/ 1 7 






DC 


l9,DrUI23H90U12347t • ANSWER 


12258 




00001 






DC 


USo RECORD MARK 










• 
» 




TF^T Ann nPFRATinisi 


12260 


26 


17130 


12334 


AD16 


TF 


(lUIMN , Mr a O f , 9CI r 


12272 


21 


1 71 30 


12349 




A 


unDK.AOiA>. Ann tari c one iiOi—icci 

IIUK>\ , AVI lO , t AUU 1 ADLC "Uj 31t*"39^ 


12284 


17 


16036 


J2350 




BTM 


TF a r An 1 A— & a . rP^T cum AMn ttunfrATnoc 


12296 


46 


12260 


00200 




QC2 


ADlbaaa 1 CflP IP ^U7 HN 


12308 


49 


12378 


00000 




B 


Am 7 










• TESTOATA 




12334 




00015 




AP16 


DC 


15,567896789789899,, P 


12349 




00015 




AQ16 


OC 


15,444443333222111,, Q 


12354 




00005 


I77#i0 

£ C Q V 


CAD16 


DSA 


AD16 


12358 




00004 






DC 


4,1010,, INDICATORS 


12360 




C0002 






OC 


2,15,, FLO LENGTH OF ANSWER 


12375 




00015 






DC 


15,012340123012010,, ANSWER 


12376 




00001 




• 


be 


1,*,, RECORD MARK 










« 
a 


TEST THAT RECOMP CONTROL IS RESET BEFORE 










e 


NEXT OPERATION 


12378 


?6 






AD17 


TF 


W0RK,CP17,, SET P 


12390 


?l 

€. & 


17130 


i t I> 7 




A 


W0RK,CQl7,e ADO WITH RECOMP 


1 2407 


C I 


1 7 1 irj 


1 7^KO 




A 


WGRK,C017,9 AGAIN WITH NO RECOMP 


12414 


17 


16038 


w C ~ w V 




BTM 


TEST,CADl7-4,, TEST SUM AND INDICATORS 


12426 


46 


12378 


00200 




BC2 


AD17,,, LCOP IF SW2 ON 


12438 


49 


1 ?47A 


oonnn 




B 


SUBI 










• TESTOATA 




12454 




00005 




CP17 


OC 


5, -31645, • P 


12459 




00005 




CQ17 


OC 


5,54673,9 Q 


12464 




00005 


J237e 


CAD17 


DSA 


A017 


12468 




00004 






DC 


4,1000, 9 INDICATORS 


12470 




00002 






OC 


2 8 5,, FLD LENGTH OF ANSWER 


12475 




00005 






OC 


5,77701,9 ANSWER 


12476 




00001 






DC 


l9*99 RECORD MARK 



ONLY THREE SUBTRACT TESTS ARE MAOE9SINCE ALL OF THE 
CIRCUITRY EXCEPT THE E CYCLE ENTRY SET Of THE T/C TRIGGER 
IS THE SAME AS THAT OF ADD 



D13C02 
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12478 26 17130 125A7 

12490 22 17130 12557 

12502 17 16038 J2558 

125H 46 12478 00200 

12526 49 12580 00000 



SUBl 



12547 
12557 
12562 
12566 
12568 
12578 
12579 



OOOlO 
OOOlO 

00005 J2478 

00004 

00002 

00010 

00001 



TF 
S 

BTM 
BC2 
B 



TESTDATA 



SPl 
SQl 
CSUBl 



DC 

DC 

DSA 

DC 

DC 

DC 

DC 



WORK, SPl. t SET P 

WORKtSOl,* *P GREATER THAN ♦Q 

TEST »CSUBt-4«»TEST DIFFERENCe ANO INDICATORS 

SUBtttf LOOP IF SW2 ON 

SUB2 



10»5833290764,, P 
\0t4945070316t » Q 
SUBI 

4,100Q,, INDICATORS 

2, 10 Ml FLD LENGTH OF ANSWER 

10,08«f8220448,, ANSWER 



1 



RECORD HARK 



TEST SUBTRACT OPERATION 



12580 26 17130 12644 

12592 12 17130 K9476 

12604 17 16038 J264? 

12616 46 12580 00200 

12628 49 12662 00000 



12644 
12649 
12653 
12655 
12660 
12661 



00005 

00005 J2580 

00004 

00002 

00005 

00001 



SUB2 



TF 

SM 

BTM 

BC2 

B 



TESTDATA 



SP2 
CSUB2 



DC 

DSA 

DC 

DC 

DC 

DC 



WORK,!5P2f» SETP 

W0RK,^9476»9 -P»*Q 
TEST,CSUB2-4,, TEST 



ANSWER OVERFLOWS 
DIFFERENCE ANO INDICATORS 



SUB2t , 9 
SUB3 



5,-785l6t» 

SUB2 

4,0010t» 

2t05,, 

5,^0T992», 



LOOP IF SW2 ON 



INDICATORS 
FLO LENGTH OF 
ANSWER 
RECORD MARK 



ANSWER 



12662 26 17130 12731 

12674 22 17130 12741 

12686 17 16038 J2742 

12698 46 12662 00200 

12710 49 12764 00000 



• TEST SUBTRACT OPERATION 

SUB3 TF W0RK,SP3»» SET P FIELD 

5 W0RK,SQ3,, TEST CARRY CKTS FOR CARRY IN AND ALL DIGITS 
BTM TeST,CSUB3-4,, TEST DIFFERENCE ANO INDICATORS 

BC2 SU83,«, LOOP IF SW2 ON 

6 Ml 



• TESTDATA 



12731 
12741 
12746 
12750 
12752 
12762 
12763 



OOOlO 
00010 

00005 J2662 

00004 

00002 

00010 

00001 



SP3 
SQ3 
CSUB3 



DC 

DC 

OSA 

DC 

OC 

DC 

OC 



10,9999999999», P 
10»01234567a9»» Q 
SUB3 

4,1000>9 INDICATORS 

2«10«, FLO LENGTH OF ANSWER 

10»9876543210», ANSWER 

lt*»9 RECORD MARK 



» 

• 

• THIS SECTION TESTS ALL THE CIRCUITS AND 

• TRIGGERS ASSOCIATED WITH MULTIPLY. IT SAYS HERE, 

« TEST THAT PRODUCT AREA IS CLEARED AND E/2 

• TRIGGER IS OK 

12764 16 C0080 000Q7 Ml TFM 80»87,lOo PUT A 7 IN 80 AND FLG8 IN 79t 

» THE 7 SHOULD CLEAR BUT NOT THE 6 



DTX02 FN a72333 EC 40tt980 



Page 36 



12776 


13 


12787 


000-0 




MM 


•tlltOflOt 


00 X 00 * 0000 


12788 


43 


12824 


00080 




BD 


• >36 1 80 f » 


TEST LOCATION 80 


12800 


44 


12824 


00079 




BNF 


» + 24,79, , 


TEST LOCATION 79 


12812 


49 


12836 


00000 




B 


•►24,,, 


79 AND 80 BOTH GOOD 


12824 


17 


17332 


J2824 




BTM 


EI^ROR,*,, 




12836 


26 


17130 


00099 




TF 


WpRK,99, , 


MOVE ANSWER SO IT CAN BE TESTED 


12848 


17 


16038 


J2884 




BTM 


T|ST,CMl-4, 


, NOW GO TEST THE ANSWER AND IN»iICATOH 


12860 


46 


12764 


00200 




BC2 


Ml » , , 


LOOP IF SW2 ON 


12872 


49 


12900 


00000 




B 


M? 












• TESTDATA 






12888 




00005 


J2764 


CMl 


DSA 


Ml 




12892 




00004 






DC 


4,0100,, 


INDICATORS 


12894 




00002 






DC 


2,04,, 


FLO LENGTH OF ANSWER 


12898 




00004 






DC 


4,0000,, 


ANSWER 


12899 




00001 




» 


DC 


If*,, 


RECORD MARK 










• 
• 




TEST MULTIPLY 


OPERATION 


12900 


13 


12961 


000-2 


M2 


M M 


MP2,2,10, 


2X3=6, RESET E/Z AT TR37 


12912 


26 


17130 


00099 




TF 


WORK, 99, , 


MOVE ANSWER 


12924 


17 


16038 


J2962 




BTM 


TEST,CM2-4, 


, TEST PROD AND INDICATORS 


12936 


46 


12900 


00200 




BC2 


MI2 , , , 


LOOP IF SW2 ON 


12948 


49 


12978 


00000 




B 


M3 












• TESTDATA 






12961 




00002 




MP2 


DC 


2,3,, 


P 


12966 




00005 


J2900 


CM2 


DSA 


M2 




12970 




00004 






DC 


4,1000,, 


INDICATORS 


12972 




00002 






DC 


2.04, , 


FLD LENGTH OF ANSWER 


12976 




00004 






DC 


4,0006, , 


ANSWER 


12977 




00001 




• 


DC 


it',. 


RECORD MARK 










• 


TESfT MULTIPLY 


OPERATION 


12978 


13 


13039 


OOOMO 


M3 


MM 


MP3,40,10, 


40X50, RESET E/L AT TR 40 


12990 


26 


17130 


00099 




TF 


WORK, 99, , 


MOVE ANSWER 


13002 


17 


16038 


J3040 




BTM 


T£ST,CM3-4, 


, TEST PROD AND IND 


13014 


46 


12978 


00200 




BC2 


M3 , , , 


LOOP IF SW2 ON 


13026 


49 


n056 


00000 




B 


M4 












w 

♦ TESTDATA 






13039 




00002 




MP3 


DC 


2,50,, 


P 


13044 




00005 


J2978 


CM3 


DSA 


M3 




13048 




00004 






DC 


4,1000,, 


INDICATORS 


13050 




00002 






DC 


2,04, , 


FLD LENGTH OF ANSWER 


13054 




00004 






DC 


4,2000, , 


ANSWER 






nnnn i 






DC 


I,',, 


RECORD MARK 










• 


ROUTINE M4 TESTS THE MULTIPLY TABLE FOR 










• 


CONTENTS AND 


ADDRESSING 


13056 


23 


13125 


13125 


M4 


M 


MP4,MP4, , 


CHECK ALL POSITIONS OF MULT TABLE 


13068 


26 


17130 


00099 




TF 


WORK, 99, , 


MOVE ANSWER 


13080 


17 


16038 


J3126 




BTM 


TEST,CM4-4,, TEST PROD AND INO 


13092 


A6 


13056 


00200 




BC2 


M4,,, 


LOOP IF SW4 ON 


13104 


49 


13158 


00000 




B 


M5 












w 

» TESTDATA 






13125 




OOOlO 




MP4 


DC 


10,0123456789,, USED FOR BOTH P AND Q 


13130 




00005 


J 3056 


CM4 


DSA 


M4 
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13134 
13136 
13156 
13157 



00004 
00002 
00020 
OOOOl 



DC 4,1000,, INDICATORS 
DC 2,20,, FLO LENGTH OF ANSWER 

DC 20,15241578750190521,, ANSWER 
DC If • , t RECORD MARK 

THE FOLLOWING ROUTINES USE DATA TO TEST ALL TRIGGERS 
AND CONTROL CIRCUITRY ASSOCIATED WITH MULTIPLY 



i:i58 


23 


13227 


13237 


M5 


M 


MP5,MQ5,, JUST MULTIPLY ♦PX+Q 


13170 


26 


17130 


00099 




TF 


WORK, 99,, MOVE ANSWER 


13182 


17 


16038 


J3238 




BTM 


TEST,CM5-4,, TEST PROD AND INO 


13194 


46 


13158 


00200 




DC 2 


M5,, , LOOP IF SW2 ON 


13206 


49 


132 70 


00000 




B 


M6 










• TESTDATA 




13227 




OOOlO 




MP5 


DC 


10,8463166491,, P 


13237 




00010 




MQ5 


DC 


10,4184169621,, Q 


13242 




00005 


J3158 


CM5 


DSA 


M5 


13246 




00004 






DC 


4,1000,, INDICATORS 


13248 




00002 






DC 


2,20,, FLD LENGTH OF ANSWER 


13268 




00020 






DC 


20,35411324129107369911, , ANSWER 


I 3269 




COOOl 






DC 


1,*,, RECORD MARK 










■ • 


TEST MULTIPLY OPERATION 


13270 


23 


13339 


13349 


M6 


M 


MP6,MQ6,, MULTIPLY -PX+0 


I 3282 


26 


17130 


00099 




TF 




13294 


17 


16038 


J3350 




BTM 


TEST,CM6-4,, TEST PROD AND INO 


1 3306 


46 


1 3270 


00200 




BC2 


, , , i.UUr ir on £ UIM 


13318 


49 


13382 


00000 




B 












* TESTDATA 




13339 




00010 




MP6 


DC 


10,-8966666234,, P 


13349 




00010 




MQ6 


DC 


10,4607518333,, Q 


13354 




00005 


J3270 


CM6 


DSA 


M6 


13358 




00004 






DC 


4,0000^ # INDICATORS 


13360 




00002 






DC 


2,20,, FLO LENGTH OF ANSWER 


13380 




00020 






DC 


20,-41314079059047067922, , ANSWER 


13?81 




OOOOl 




• 


DC 


1 , • , , RECORD MARK 










• 
» 




TEST MULTIPLY OPERATION 


13382 


23 


13451 


13461 


M7 


M 


MP7,MQ7,, MULTIPLY ♦PX-Q 


13394 


26 


17130 


00099 




TF 


WORK, 99,, MOVE ANSWER " 


13406 


17 


16038 


J3462 




BTM 


TEST,CM7-4,, TEST PftOD AND I'f^O 


13418 


46 


13382 


00200 




^c^ 


M7,,, LOOP IF SW'2 ON 


13430 


49 


13494 


00000 




B 


M8 










w 

• TESTDATA 




13451 




00010 




MP7 


DC 


10,1976138156,, P 


13461 




00010 




MQ7 


DC 


10,-2836292471,, Q 


13466 




00005 


J3382 


CM7 


DSA 


M7 


13470 




00004 






DC 


4,0000,, INDICATORS 


13472 




C0002 






DC 


2,20,, FLD LENGTH OF ANSWER 


13492 




00020 






DC 


20,-05604905773518623476,, ANSWER 


13493 




OOOOl 






DC 


lt*tt RECORD MA&K 














TEST MULTIPLY OPERATION 


13494 


23 


13563 


13573 


M8 


M 


MP8,MQ8,, MULTIPLY -PX-Q 


13506 


26 


17130 


00099 




TF 


WORK, 99,, MOVE ANSWER 
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13518 


17 


16038 


J3574 




BTM 


TESTtCM8-4tf TEST PROD AND INO 


13530 


46 


13494 


00200' 




BC2 


Matvt LOOP IF SW2 ON 


13542 


49 


17710 


00000 




B 


FINISH*»f IF THE DIVIDE DECK IS IN* THIS WILL 










• 




BE REPLACED WITH A BRANCH TO LUV1*12« 










• TESTOATA 




L3563 




00010 




MP8 


DC 


10|-3428461753tt P 


1 n c: ^ 1 

13573 




000 10 




MQ8 


DC 


10»-92001B5479, » Q 


1 3578 




00005 


J3494 




DSA 


M8 


1 1 c a 




00004 






DC 


4»1000f» INDICATORS 


1 :i c: a A 




00002 






DC 


2»20»i FLO LENGTH OF ANSWER 


1 3604 




00020 






DC 


20f 31542484035257484687, , ANSWER 


1 3605 




00001 




• 


DC 


l,«to RECORD MARK 










• 

• 


THIS SECTION TESTS THE CIRCUITRY ASSOCIATED UiTH 










• 


LOAD DIVIDEND OPERATION 


13606 


17 


16926 


J3606 




BTM 


CLEAR, •«» CLEAR WORK AREA 










• 


TEST LOAD DIVIDEND OPERATION 


13618 


26 


00099 


13710 


LOVl 


TF 


99,0LDVl,, LOAD 79-99 WITH 20 DIGITS AND A RECORD MARK 


1 3630 


18 


1 364 I 


000-0 




LDM 


•♦11,0,10, LDM SHOULD CLEAR 80 THRU 99, BUT WILL 










ft 




TRANSMIT NO DATA TO PRODUCT AREA. 


1 3642 


26 


17130 


00099 




TF 


WORK, 99,, MOVE 79-99 FOR TESTING 


1 3654 


17 


16038 


J371 1 




BTM 


TeST,CLDVl-4,, TEST THE RESULTS 


13666 


46 


13618 


00200 




BC2 


LDVl,,, LOOP IF SW2 ON 


13678 


49 


13744 


00000 




8 


LDV2 










• TESTOATA 




13710 




00021 




OLD VI 


DC 


21,901234567890123456789,, TO PUT IN PRODUCT AREA 


13715 




00005 


J3618 


CLDVl 


DSA 


LDVl 


13719 




00004 






DC 


4,0000,, INDICATORS 


13721 




00002 






DC 


2,21,, FLD LENGTH OF ANSWER 


13742 




00021 






DC 


21,900000000000000000000,, 79-98 CONTENTS AFTER LOM OPN 


13743 




00001 




ft 


DC 


U»,, RECORD MARK 










« 
ft 


TEST LOAD DIVIDE OPERATION 


13744 


28 


00089 


13813 


LDV2 


LO 


89,OL0V2,, LOAD A TEN DIGIT FIELD 


13756 


26 


171 30 


00099 




TF 


WORK, 99,, MOVE PRODUCT AREA TO TEST AREA 


13768 


17 


16038 


J3814 




BTM 


TEST,CLDV2-4,, TEST THE RESULT 


13780 


46 


13744 


00200 




BC2 


L0V2,,9 LOOP IF SW2 ON 


1 3792 


49 


13846 


00000 




B 


L0V3 










w 

• TESTOATA 




13813 




00010 




0L0V2 


DC 


10,-0123456789,, DIVIDEND 


13818 




G0005 


J3744 


CL0V2 


DSA 


LDV2 


13822 




00004 






OC 


4,0000,, INDICATORS 


13824 




00002 






DC 


2,20,, FLD LENGTH OF ANSWER 


13844 




00020 






DC 


20,'-01234567890000000000,« t>ROD AREA AFTER LO 


13845 




00001 




« 


OC 


US, RECORD MARK 










ft 
ft 


TEST LOAD DIVIDE OPERATION 


13846 


18 


00094 


R4053 


L0V3 


LDM 


94,94053,, TEST LOAD IMMEDIATE 


13858 


26 


17130 


00099 




TF 


WORK, 99,, MOVE TO TEST AREA 


13870 


17 


16038 


J3906 




BTM 


TEST,CLDV3-4,, NOW LETS TEST 


13882 


46 


13846 


00200 




BC2 


LDV3,,, LOOP IF SW2 ON 


13894 


49 


13928 


00000 




B 


DIVl 
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13910 
1391A 
13916 
13926 
13927 



00005 J38A6 

00004 

00002 

00010 

00001 



» TESTDATA 
CLDV3 OSA 
DC 
DC 
OC 
DC 

» 

o 



L0V3 

A.OOOOtf INDICATORS 
2tl0tt FLD LENGTH OF ANSWER 

i0»9405300000f t MHAT THE PROOUCT AREA IS GONNA B{ 
If'ff RECORD HARK 



a|,l of the divide circuitry is tested with the 
follow^:ng routines. 



13928 


28 


00097 


14006 


DIVl iO 


9f ,DDl,« 


LOAD DIVIDEND 




I Q 


w \J W 7t 




n u 


9 0 9 1 0 ? 9 


DIVIDE BY 00, SET CFLO, END Of 




c o 


1 7 1 in 


nnnoo 


1 r 


t-i n 1/ n 

WURK999f» 


MOVE ANSWER TO BE TESTED 


1 3964 


1 7 


I K>\J J O 




tt T M 

Din 


1 » •tUl VI— 4j f 


GO TO TEST 


1 3976 


46 




w vl £ W 




n t u 1 . 


LUUP ir dWZ ON 


a 1^ 7 Q w 


4Q 




nnnnn 

UUUUU 


ts 

• 


0IV2 












• TESTDATA 






1A006 




00007 




DDI DC 


7.0Q12345f » 


DIVIDEND 


14011 




C0005 


J3928 


COIVl OSA 


DIVl 




14015 




00004 




OC 


4»0l 10» « 


INDICATORS 


14017 




00002 




DC 


2«0Q»« 


FLD LENGTH OF ANSWER 


14026 




.00009 




OC 


9,001234500, » 


PROD FIELD AFTER DIV BY ZERO 


1402 7 




OOOOl 




DC 


1 » ' 1 e 


RECORD MARK 










« 


rEST LOAD DIVIDE 


OPERATION 


14028 


18 


00094 


L5094 


Diy2 LOM 


94,35094, , 


LOAD QUOTIENT AREA 


14040 


19 


00093 


OOOKM 


DM 


93,24,1011, 


DIV BY -24, SHOULD TAKE 10 SI 


14052 


26 


17130 


00099 


TP 


WORK, 99, • 


MOVE RESULT TO BE TESTED 


14064 


17 


16038 


J4100 


BT« 


TEST,.CDIV2-49, 


GO TEST RESULT 


14076 


46 


14028 


00200 


BC2 


DIV2,,, 


LOOP IF SW2 ON 


14088 


49 


14122 


ooobo 


8 


0IV3 










• 

• TESTDATA 






14104 




00005 


J4028 


CDIV2 DSA 


DIV2 




14108 




00004 




OC 


4,0110,, 


INDICATORS 


14110 




00002 




DC 


2,10,, 


FLO LENGTH OF ANSWER 


14120 




00010 




OC 


10,3269400000,,, RESULTS 


14121 




00001 




OC 


l»*f. 


RECORD MARK 



14122 28 00099 14234 

14134 29 00090 14203 

14146 16 17097 OOOJO 

14158 17 16038 J4204 

14170 46 14122 00200 

14182 49 14236 00000 



DIV? 



TEST DIVIDE OPERAriON 

"LD 99, OR,, 

D 90,DS3,, 

TFM DIVFLG,10,10, 

BTM TEST,C0!V3-4, 

BC2 DIV3,,, 

B 0IV4 



LOAD DIVIDEND 

QUOTIENT OF ZER0,0I VI DENO BECOMES REMAINDER 
SET DIVIDE FLAG AND QUO FLO LENGTH 

GO TEST 
LCOP IF SW2 ON 



14203 
14208 
14212 
14214 



00010 

00005 J4122 

00004 

00002 



• TESTDATA 
0S3 DC 
C01V3 DSA 
OC 
OC 



10, 8736542379,, DIVISOR 
0IV3 

4,0100,9 INDICATORS 

2,20,, LENGTH OF QUO ANO REM 
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l^22A 




00010 






DC 


10,0,, QUOTIENT 


lA23<r 




OOOlO 




OR 


DC 


10,4906279^45, .REMAINDER, SAME AS 


14235 




00001 




• 


DC 


I,*,* RECORD HARK 










• 

• 




TEST DIVIDE qPERATION 


14236 28 


00097 


14317 


DIV4 


LD 


97,DD4,, SET DIVIDEND 


IA248 


19 


00090 


000M9 




DM 


90,49, IQ, TEST DIVIDE IPMEO 


U260 


16 


17097 


OOOJO 




TFM 


DIVFLG,10,10, SET DIV FLG 


14272 


17 


16038 


J4318 




DTM 


TEST,CDIV4^4, , TEST RESULT 


14284 


46 


14236 


00200 




BC2 


DIV4,,, LCOP IF SW2 ON 


14296 


49 


14342 


00000 




0 


DIV5 



14317 OOOlO 

14322 00005 J4236 

14326 00004 

14328 00002 

14338 00010 

14340 00002 

14341 OOOOl 



• TESTDATA 

0D4 DC 



CDIV4 



DSA 

DC 

DC 

DC 

DC 

DC 



10,0386574912, .DIVIDEND 
DIV4 

4,1000,, INDICATORS 

2,12,, FLO LENGTH OF QUO AND REM 

10,0788928391,, QUOTIENT 
2,41,. REMAINDER 
1 . ■ , , RECORD MARK 



14342 28 

14354 19 

14366 16 

14378 17 

14390 46 

14402 49 



00099 14420 
00094 00M3P 
17097 000-6 
16038 J4421 
14342 00200 
14442 00000 



DIV5 



LD 

DM 

TFM 

BTM 

BC2 

B 



TEST DIVIDE OPERATION 

99,0D!>,, LOAD DIVIDEND 

94,437,911, DIVIDE BY -437 
DIVFLG,6,10, SET DIVIDE FLG 
TEST,CDIV5-4,, TEST ANSWER 



DI V5, , , 

0IV6 



LCOP IF SW2 ON 



TESTDATA 



14420 




00007 




DD5 


DC 


7,5394765, . 


DIVIDEND 






14425 




00005 


J4342 


C0IV5 


DSA 


DI V5 








14429 




00004 






DC 


4,00(1)0,, 


INDICATORS 






14431 




00002 






DC 


2,09, , 


FLD LENGTH OF QUO 


AND 


REM 


14437 




00006 






DC 


6,-012345, , 


QUOTIENT 






14440 




00003 






DC 


3,000, , 


REMAINDER 






14441 




00001 




• 


DC 


1 , • , , 


RECORD i^ARK 














• 

• 


TE 


ST DIVIDE OPERATION 






14442 


28 


00099 


14521 


. D1V6 


LD 


99,DD6, , 


GET READY 






14454 


19 


00092 


000Q3 




DM 


92,83,10.. 


DIVIDE BY 83 






14466 


16 


17097 


000-8 




TFM 


DI VFLG.8.10. 


SET DIVIDE FLAG 






14478 


17 


16038 


J4522 




BTM 


TE':T,CDIV6-4., 


TEST ANSWER 






14490 


46 


14442 


00200 




BC2 


DIV6. ,. 


LOOP IF SW2 ON 






14502 


49 


14544 


00000 




B 


DIV7 
















• TESTDATA 










14521 




00008 




DD6 


DC 


8,-56348769,, 


DIVIDEND 






14526 




00005 


J4442 


CDIV6 


DSA 


DIV6 








14530 




03004 






DC 


4,0000,, 


INDICATORS 






14532 




00002 






DC 


2,10,, 


FLD LENGTH OF QUO 


AND 


REM 


14540 




00008 






DC 


8,-00678900,, 


QUOTIENT 






14542 




00002 






DC 


2,-69,, 


REMAINDER 






14543 




00001 






DC 


ItSt 


RECORD MARK 







DTX02 



PN 2172333 



EC U0M980 



Page til 



TEST DIVIDE OPERATION 



1 y. c A y. 


28 


r\ r\ r\ f> r\ 

00090 


14625 


DIV7 


LD 


90tOD7ff GET PREPARED 


1 y. c c ^ 


29 


f\ A /\ n 

00090 


t y. A ^ c 

14635 




0 


90fDS7tt NOW. DIVIDE 


I AI!»68 


16 


1 7097 


OOOJO 




TFM 


DI VFtGt lOff 10« SET DIVIDE FLAG 


1 /.con 


17 


16038 


J4636 




BTM 


TEST ♦CDlV7-4t f TEST THE ANSWER NOW 


1 y< K €*i 


/- A 

HO 


t y. c y. y. 
14544 


ft ft 1 ft ft 
00200 




BC2 


DlVTftt LOOP IF SW2 ON 


I HO0*» 


y*. fi 
49 


1 y. A A Q 

14668 


ftft*ftft:ft 

00000 




B 


01 VB 










• TESTDATA 




14625 




00010 




DD7 


DC 


10,-395774156B,, DIVIDEND 


1 A c 




000 10 




DS7 


DC 


10t4180204239t t DIVISOR 






00005 


J4544 


C0IV7 


DSA 


DIV7 


t y. A y. y. 




00004 






DC 


4,0000tt INDICATORS 


14646 




00002 






DC 


2,20f» FLD LENGTH OF QUO AND 1 


• 1 y. A C A 

1 4656 




000 10 






DC 


10t-0946781865» . QUOTIENT 


14666 




0001 0 






DC 


lOt-2518674265,, REMAINDER 


1 y. A A *y 
I 466 7 




f> r\ f\ t\ % 

0000 1 




• 


DC 


If St RECORD MARK 










• 

» 


TEST DIVIDE OPERATION 


1 / A A a 
14668 


28 


00090 


14749 


DIV8 


LD 


90,DD8,, LOAD 


1 y. A o o 
I 4680 


29 


r\ t\ n n f\ 

OUOwO 


1 y. "7 l: ft 

14759 




D 


90iDS8ff GO 


1 y. A ri ^ 
1 469Z 


16 


1 1 n rfc "y 

1 7097 


OOOJO 




TFM 


DIVFLGflO.lO, SET FLAG 


1 4704 


17 


16038 


J4760 




BTM 


TEST,CDlV8-4, , TEST 


In f 16 


46 


I'y. A A Q 

146.68 


ft ft 1 ft ft 
00200 




BC2 


DIV8,., LOOP IF SW2 ON 


1 A 7 O O 

14 #28 


y. r\ 
49 


14792 


ft ft ft ft ft 
00000 




B 


DIV9 










w 

• TESTDATA 




14749 




00010 




DD8 


DC 


10,6157148239,, DIVIDEND 


1 y T c n 
1 4 759 




OOOlO 




DS8 


DC 


10,-2166739812,, DIVISOR 


14764 




00005 


J4668 


CDIV8 


OSA 


OIVB 


t y T A a 

14768 




00004 






DC 


4,0000, , INDICATORS 


14770 




00002 






DC 


2,20,, FLD LENGTH OF QUO AND 


\ y, *T o 

1 4 780 




00010 






DC 


10,r-2tt41664792, , QUOTIENT 


1 y- 1 r» A 

1 4 79C| 




000 10 






DC 


10,1814900896,, REMAINDER 


1 A T O t 




ft 1^ O ft 1 

0000 1 




♦ 


DC 


1, • , , RECORD MARK 










• 
« 


TEST DIVIDE OPERATION 


14 792 


28 


00090 


14873 


0IV9 


LD 


90,DD9,, LOAD DIVIDEND 


I s 8 0 ^ 


29 


ft rift ft ft 

00090 


14883 




D 


90,DS9,, DIVIDE IT NOW 


1 *t8l6 


16 


1 7097 


OOOJO 




TFM 


D1VFLG,10,10, SET THE FLAG FOR TEST 


1482 8 


1 7 


16038 


J4a84 




BTM 


TEST,CDIV9-4, , AND TEST THE ANSWER 


14840 


46 


14792 


00200 




BC2 


D;V9, ,, LOOP IF SW2 ON 


14852 


49 


14916 


n /\ ey g\ r\ 

00000 




B 


. DIVIO 










• TESTDATA 




14873 




00010 




DD9 


DC 


10,-6778463482,, DIVIDEND 


* A Q Q ^ 




ft ft ft 1 ft 
00010 




0S9 


DC 


10,-6884175503,, DIVISOR 


14888 




00005 


J4792 


CDIV9 


DSA 


DIV9 






ft ft ft ft y. 
00004 






DC 


4,1000,, INDICATORS 


I A. no A 




ft ft ft ft «j 






DC 


2,20,, FLD LENGTH OF QUO AND 


14904 




00010 






DC 


10,0984644200,, QUOTIENT 


14914 




00010 






DC 


I0t-*1188967400, , REMAINDER 


14915 




00001 




• ■ . ■ 


DC 


If RECORD MARK 














TEST DIVIDE OPERATION 


14916 


28 


00086 


14999 


DIVIO 


LD 


86fDDI0,, LOAD THE DIVIDEND 



REM 



DTX02 PN 2172333 EC M0M980 



Page M2 



1^928 


29 


00076 


15005 


D 




16 


17097 


000K4 


TFM 


U952 


17 


16038 


J5006 


BTM 


14964 


46 


14916 


00200 


bC2 


14976 


49 


17710 


00000 


B 










• 

• TESTOATA 


14999 




00012 




DOlO DC 


15005 




U0006 




DSIO DC 


15010 




00005 


J4916 


CDIVIO DSA 


15014 




00004 




DC 


15016 




C0002 




DC 


15040 




00024 




DC 


15046 




00006 




DC 


15047 




OOOOl 




DC 



76,D!>10,, DIVIDE AND GET A LONG ANSWER 

DI VF|,G,i!4, 10, SET THE DIVIDE FLAG 
TEST, CD9V10-4, .TEST THE ANSWER 
DIVIO, I,. LOOP IF SW2 ON 

FINISH, ,|, END OF THE TEST 



I2t2|()l8562l3997,, DIVIDEND 
6,43,3675,, DIVISOR 

DIVlip 

4,1000,, INDICATORS 

2,30,, FLD LENGTH OF QUO AND REM 

24,01000059692 53182811876674, , QUOTIENT 
6,033030f, REMAINDER 
!•*,, RECORD MARK 



COMMON TEST AND ERROR ROUTINE FUR ARITHMETIC TESTS. 



15990 










DORG 


15990 








15990 




00005 




CKR 


DSC 


5,0, , , 


LOCATION OF ROUTINE BEING 


TESTFO 




15995 




00004 




CKI 


DSC 


4,0,, 


CORRECT INDICATOR PATTERN 






159*99 




00002 




CKL 


DSC 


2,0, , 


FIELD LENGTH OF ANSWER 






16001 




00030 




• CKD 


DSC 


30,0,, 


CORRECT ANSWER 






16031 




00006 




• 


DSC 


6,0, , 


TEST INFORMATION ADDRESS 






16038 


46 


16926 


00100 


m 

TEST 


BCl 


CLEAR, , • 


TEST ENTRY, BYPASS TEST IF 


SWl ON 




16050 


26 


16073 


16037 




TF 


•♦23,TEST-1,, 


SET ADR OF TEST INFO INTO 


TR INSTRUCTIO 


16062 


31 


15990 


00000 




TR 


CKR.O, , 


BRING IN TEST DATA 






16074 


16 


17183 


0-000 


• 


TFM 


I NO, 0,8, 


CLEAR INDICATOR FIELD 






16086 


47 


ItllO 


01100 


• 


BNP 


»+24, , , 


SET UP INDICATOR PATTERN, 


TEST H/P 


F IRST 


16098 


15 


17180 


OOOOJ 




TDM 


IND-3,1,11, 








16110 


47 


16134 


01200 




BNE 


•♦24,,, 


TEST e/0 






16122 


15 


17181 


OOOOl 




TDM 


lND-2,1, , 








16134 


47 


16158 


01400 




BNV 


•♦24, , , 


TEST OFLO 






16146 


15 


17182 


OOOOl 




TDM 


I NO- 1,1,, 








16158 


47 


16182 


01900 




BNA 


•♦24,,, 


TEST ANY DATA CHECK 






16170 


15 


17183 


OOOOl 




TDM 


IND. 1, , 
















• 


THE FOLLOWING ROUTINE IS USED INSTEAD OF A 


COMPARE 


OPN 










• 


TO TEST FOR A CORRECT INDICATOR PATTERN 






16L82 


25 


16229 


15995 




TD 


HPT+11,CKI,, 


CHECK CORRECT 






16194 


25 


16228 


17180 




TD 


HPT^IO, IND-3, 


,H/P WITH ACTUAL 






16206 


33 


16229 


00000 




CF 


HPT+ll,,, 


CLEAR FLAG FROM Q UNITS TO 


PREVENT 


lA 


16218 


43 


16350 


17201 


HPT 


BD 


SF,XXXOO,, 


WILL BRANCH IF WRONG 






16230 


25 


16265 


15996 




TD 


EOfl UCKUl,, 


CHECK e/0 






16242 


25 


16264 


17181 




TD 


EO+IO, IND-2,, 








16254 


43 


16350 


17201 


EO 


BD 


SF,XXXOO, , 


WILL BRANCH IF WRONG 






16266 


25 


16301 


15997 




TD 


0Vfll,CKI+2,, 


CHECK OVERFLOW 






16278 


25 


16300 


17182 




TO 


0V*10, IND-l, , 








16290 


43 


16350 


17201 


OV 


BO 


SF,XXXOO, , 


WILL BRANCH IF WRONG 






16302 


25 


16337 


15998 




TO 


AN^l I ,CKl+3, , 


TEST ANY DATA CHECK 






16314 


25 


16336 


17183 




TD 


AN+10, IND, , 
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16326 


43 


16350 


17201 


16338 


49 


16362 


coooo 

\J \y VJ \j KJ 


1 6350 


32 


1 7098 


00000 

w w \J W V/ 


1 6362 


45 


* V' ^ v> 


16001 


1637A 


49 


16662 


00000 


16 386 


44 




1 7nqA 




1 5 


no 1 00 


nnnnft 


1 6409 




COOO 1 




1 64 10 


31 


k ' k k 


V W Vi 1 V 


16422 


1 5 


001 00 


00000 


1 64.34 


49 


1 w "T ^ O 


U U vl W W 


1 6446 


^ 1 


1 7 1 n 1 


1 7 1 n 7 
III 


1 O J o 


ii 


i O J u o 


1 7 1 n 5 


1 A4 7n 

I O *T f I J 


J 


n f! n n n 

u O U U (J 


n n 1 n 9 
U U i u ^ 


16482 


39 


1 7255 


00100 


I O *♦ H 




1 A A n 
I o o ^ u 


UUUUU 


16 506 


44 


16446 


17101 


1 ^ 1 R 
1 O ? 1 o 


c. O 


1 A t> A >1 


1 A n M 


16530 


£. \J 


i O ^ J 


i O U \J\J 


I 6 547 


74 


t AOrtO 
k ow vy V/ 


171 nn 


16554 


47 


I O O V u 


n 1 7nn 


1 6566 




1 A Asn 

I O O V v 


I u w 


16578 


44 


X w n o 


1 7nQA 

k 1 VJ ^ o 


16590 


26 


16620 


17097 


1 6602 


26 


1 u U ^, J 


1 7nQ7 




74 




1 7 1 nn 


16626 


47 


16650 


01200 


16638 


47 


16662 


01400 


1 66sn 

L \J %J J XJ 


"^7 






16162 


44 


16926 


17098 


1 6674 


47 


1 A7 1 n 


nn "^nn 


X w u o u 


4R 




nnnnn 


I 66QA 

1 M U 7 O 


49 


t AQ7A 


nnnnn 


16710 


26 


17172 


15994 


16722 


34 


(1 n n n n 

W W \J w 


nn 1 n7 


16734 


39 


17213 


nn ] nn 


16746 


38 


17168 


nn 1 nn 

WW k\J \J 


16758 


'14 


nnnon 

\J K> \J\J \J 


nn 1 n7 


16770 


26 


1 71 72 


1 5998 


16782 


38 


17169 


00100 


16794 


39 


17175 


OOlOO 


16806 


45 


16830 


16001 


16818 


«»9 


16842 


00000 


16830 


38 


16001 


00100 


16842 


34 


00000 


00102 


16854 


38 


17180 


OOlOO 


16866 


39 


17175 


00100 



AN 

SF 
« 

DAT 



NOR 



COMPl 



C0MP2 



SF2 

TESTER 



TY 



BO 

B 

SF 



BNR 
B 

BNF 
TDM 
DC 
TR 
TDM 
P 



SF,XXX00t» WILL BRANCH IF WRONG 
DAT,,, NO INDICATOR ERROR 

ERRFLG,,, SET ERROR FLAG FOR INDICATOR ERROR 



•+24,CKD,, SEE IF ANY DAIA TO CHECK 
TESTER,,, GO SEE IF THERE W<A,S AN IND ERROR 

NQR,DIVFLG-l, ,WAS IT A OIViDE OPtRATION 

100,,, YES, NOW PUT A R/M IN 100 SO A TR WILL WORK 

R/M 



BRING DATA FROM PRODUCT AREA TO WORK AREA 
RESTORE 100 



WORK-29,70, , 
100,0, , 

NUR 

SHIFT COMPUTED ANSWER LEFT UNITL HI ORDER DIGIT 

IS IN LOCATION 17101. 
TR W0RK-29,W0RK-28, , SHIFT COMPUTED ANS LEFT ONE PLACE 
BNR •♦48,W0RK-28,,R/M INDICATES COMPUT ED . ANSWER LOST 
RCTY 

WATY LOST 

B SF2,,, SET ERROR FLAG, ANSWER LOST 

BNF NOR-12 ,W0RK-29, ,G0 SHIFT LEFT AGAIN IF NO FLAG 

TF C0MPl+6,CKL+l, ,SET ADDRESS OF CORRECT ANSWER 

TP COMPl+ll,CKL+l, ,SET ADDRESS OF COMPUTED ANSWER 

C 16000,17100,, COMPARE COMPUTED WITH EXPECTED RESULTS 

BNE SF2,,, SEE IF EQUAL 

BV SF2,,, SEE IF CORRECT FIELD LENGTH 

BNF TESTER, DIVFLG-l, , WAS IT A DIVIDE 



TF C0MP2^6,D1VFLG, , ' SET CORRECT QUOTIENT ADDRESS 

TF C0MP2>11,DIVFLG,, SET COMPUTED QUOTIENT ADDRESS 

C 16000,17100,, COMPARE COMPUTED WITH EX-PECTED QUOTIENT 

BNE SF2 

BNV •+24,,, CHECK FIELD LENGTH 

SF ERRFLG 

BNF CLEAR, ERRFLG, , SEE IF ANY ERROR 



BNC3 TY 

H * , , 

B CLEAR,,, 



ERROR STOP, IR2 HAS LOC+12 OF ERROR EXIT 
CONTINUE PROGRAM 



ERROR TYPE OUT ROUTINE 



TF 


ER2+4,CKR+4, , 


PUT ROUTINE LOCATION IN TYPEOUT 


RCTY 






WATY 


ERl,,, 


TYPE OUT ERROR LOCATION 


WNTY 


ER2 




RCTY 






TF 


ER2+4,CKI + 3» * 


SET UP CORRECT DATA FOR TYPEOUT 


WNTY 


ER2+1,,, 


INDICATORS 


WATY 


BL,,, 


SPACE 


BNR 


•♦24,CKD, , 


IS THERE AN ANSWER TO TYPEOUT 


B 


• + 24, , , 


NO 


WNTY 


CKO,,, 


DATA 


RCTY 






WNTY 


lND-3,,, 


TYPE 


WATY 


BL , , , 


SPACE 
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16878 


45 


16902 


16001 




BNR 


•♦24,CKD,, 


IS THERE AN ANSWER TO TYPEOUT 


16890 


49 


16914 


00000 




B 


•♦24,,, 


NO 


16902 


38 


17101 


00100 


• 


WNTY 


WORK-29,,, . 


TYPE OUT COMPUTED ANSWER 


1691^ 


41 


00000 


00000 


• 


NOP 






16926 


31 


17096 


17132 


CLEAR 


TR 


DIVFLG^|,ReC 


,, CLEAR WORK AREA, DIVIDE FLAG, AND 


16938 


26 


00079 


1714'! 




TF 


79,REC* ja, , 


CLEAR 69-79 FOR DIVIDE TESTS 


169S0 


47 


16962 


01400 




BNV 


12 , , ♦ 


RESET OFLO TOR 


16962 


14 


16971 


0-0-1 




CM 


• ♦9, 1 ,a|,o. 


RESET H/P AND E/Z TRIGGERS 


16974 


46 


16986 


00700 




BI 


•♦12,700,, 


RESET WRITE CHECK . 


16986 


46 


16998 


00800 




BI 


•♦12,800»» 


RESET MAR CK 


16998 


46 


17010 


01600 




BJ 


•>12,16Q0t 1 


RESET MBRE CK 


17010 


46 


17022 


01700 




BI 


•♦12f 17Q0,f 


RESET MDRO CK 


1 7022 


42 


oooop 


00000 


• 


BB 


f 1 1 


RETURN TO NEXT TEST 










• 
• 


WORK AREA AND 


INITIALIZATION DATA 


17096 










DORG 


17096 




1 7097 




00002 




DIVFLG 


DC 


2,0,, 


LOCATION OF DIVIDE FLAG 


I 709Q 




OOOOl 




ERRFLG 


DSC 


1 ,0, , 


LOCATION OF ERROR FLAG 


17130 




00032 




WURK 


DC 


32,0,, 


COMfON WORK AREA 


1/131 




OOOOl 






DC 


It' 




17132 




00003 




REC 


DSC 


3,0,, 


THIS IS USED TO CLEAR ALL FLAGS 


17167 




00033 






DC 


33,0*,, 


AND THE WORK AREA 


17168 




00005 




ER2 


DSC 


5,0, 




17173 




OOOOl 






DC 


1 . • 




17175 




00003 




BL 


DAC 


3, • 




17183 




00004 




I NO 


DC 


A,0,, 




17184 




OOOOl 






DC 


If* 




17201 




00002 




XXXOO 


DC 


2,01,17201,, 


COMPARE LOOKUP TABLE 


17211 




00002 






DC 


2,10,17211 




17212 










DORG 


17212 




17213 




00021 




ERl 


DAC 


21, ERROR IN 


ROUTINE AT • 


I 7255 




00036 




LOST 


DAC 


36, COMPUTED 


ANSWER LOST FROM WORK AREA* 



THIS IS THE ERROR ROUTINE FOR THE BRANCH TEST SECTION 



1 7330 




00005 






DC 


5.0, 




17332 


46 


17428 


OOlOO 


ERROR 


BCl 


xr 




I 7344 


47 


17360 


00300 




BNC3 


•>36,,, 


TYPE OUT IF SW3 OFF 


1 7356 


48 


00000 


00000 




H 


• , * 


IR2 CONTAINS L0C^12 


17368 


49 


17428 


00000 




B 


XT,,, 


RESET AND RETURN 


17380 


26 


17530 


17331 


• 


TF 


NUM+4, ERROR- 


Iff 










» 


ERROR TYPE OUT 




17392 


34 


00000 


00102 




RCTY 






17404 


39 


17489 


OOlOO 




WATY 


ALPHA 




17416 


38 


17526 


00100 




WNTY 


NUM 




17428 


46 


174.40 


00800 


XT . 


BI 


• ♦•12,800, , 


RESET MAR CK 


17440 


46 


17452 


01600 




BI 


•♦12, 1600, , 


RESET MBRE CK 


17452 


46 


17464 


01700 




BI 


•♦12,1700,, 


RESET MURO CK 


17464 


46 


17476 


00700 




BI 


•♦12,700, , 


RESET WRITE CHECK 


17476 


42 


00000 


00000 




BB 




RETURN TO PROGRAM 


17489 




00019 




ALPHA 


DAC 


iJIerror at 


LOCATION • 


17526 




00006 




NUM 


DSC 


6,0* 
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• THIS IS THE ERROR ROUTINE FOR THE ADO TABLE TEST 



17532 


46 


10738 


00100 


WRONG 


BCl 


TSUM*12 




175A4 


47 


17580 


00300 




BNC3 


• 4^36 




17556 


48 


00000 


OOGOO 




H 


» » » 


ERROR IN ADO TABLE TEST 


17568 


49 


10738 


00000 




8 


TSUM4^12 




17580 


17 


17332 


J0726 




BTM 


ERROR, TSUM, ♦ 


GO TO TYPE OUT LOCATION 


1 7592 


25 


17697 


17100 




TO 


MSG*20f 17100 


♦ ,SET P 


I 760A 


25 


17701 


10713 




TO 


MSG>24,Q, , 


SET Q 


17616 


25 


17705 


10700 




TO 


MSG>2 8,P-1, , 


SET SUM TENS 


17628 


25 


17707 


10701 




TO 


MSG*30,P,» 


SET SUM TENS 


176A0 


34 


00000 


00102 




RCTY 






17652 


39 


17677 


00 100 




WATY 


MSGf t f 


TYPE ERROR MESSAGE 


1766« 


49 


10738 


00000 




8 


TSUM*12 




17677 




00017 




MSG 
• 


DAC 


17,1620 SAYS 


0*0*00» 










• 
• 


PASS COMPLETE 


AND LOAD CARD ROUTINE 


17710 


U 


17870 


-0001 


FINISH 


AM 


CT,l,, 


UPDATE PASS COUNT 


17 722 


4 7 


17770 


00400 




BNC4 


• ♦48 




17734 


43 


01184 


17870 




BD 


T24.5,CT,, 


CHECK FOR 100 PROGRAM PASSES 


m^b 


43 


01184 


17869 




UD 


T24.5,CT-l,, 




17758 


49 


I 7794 


00000 




B 


•♦36 




1 7770 


45 


17794 


18117 




BNR 


•♦24,18117 




1 77B2 


49 


18000 


00000 




B 


18000 




17794 


34 


COOOO 


00102 




RCTY 






17806 


38 


17866 


00100 




WNTY 


CT-4,,, 


TYPE OUT PASS COUNT 


17818 


39 


17873 


00 100 




WATY 


JAZZ 




17830 


46 


01184 


00400 




BC4 


T24.5 




17842 


36 


00000 


00500 




RNCD 


0,,, 


LOAD NEXT PROGRAM IF SW4 OFF 


1785A 


49 


ocooo 


00000 




B 


0 




17870 




00005 




CT 


DC 


5,0,, 


PASS COUNT 


17871 




OOOOl 






DC 


I,' 




17873 




00023 




JAZZ 


DAC 


23, PASSES COMPLETE 0TX02» 


13542 










DORG 


13542 




13542 


49 


13606 


00000 




B 


13606, , , 


LINKAGE TO OIVIQE TESTS 


01184 




00000 




T2A*5 


OS 


,1184 




07914 










DENO 


LINK 
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DT X02 80/80 LIST 



36000 7200500360020 1005004'^COO 12002 762600059002742^000 U00000260009000269 -0000 
260009500264310000000200260011400274250000000011490001200000 -OOCi 
M9042080* l-l-l 184-U93 -0002 

490800000000* 0-1-4208-4220 -0003 

M4677072* 1-1-7900-7908 -0004 

J7998* 1-1-7908-7913 -0005 

4507938 1 81 1 74907962000004501 184079614900440000001 50796 ICOOOO* 0-1- 79 1 '4- 7974 -0006 
♦ 1-1-7973-7974 -0007 

491800000000* 0-1-797^-7986 -0008 

1 408008-0-0046080360 UOOl 7 17332-802447080600|400 17 17332-8048*0- 1-8000-8060 -0007 
4 7080840 19001 7 173 32-80724608000002001 408 I04-0-00'i768l 320 1400*0- 1-8060- 81 20 -0008 
4908144000001 7 173^2- 8 l32A60a 1680 1 400A908 1 8000000 1717332-8 If 8*0- 1-8 120-8180 -0009 
4 7082040190017173 32-8 1 92460H09600200 14082 24-0-00460824001 100*0-1-8180-8240 -0010 
46082 64014001 7173 32-82 524 7082 880190017173 3 2-82 76460821600200*0-1-8240-8300 -CO 11 
1408 3 08-0-004608 3 240 I 5C046 08 3480 1 4001 71 73 32-0 3 364 7083 7201900*0- 1-8 300- 8 360 -CO 1 2 
I 71 73 32-8360460830000200 1408 392-0-0046084080 I 7004608'»320 1400*0- 1-8 360-8420 -0013 
I 7173 32-842047084 560190017173 32-84444608384002001408476-0-00^0-1-8420-8480 -CO 14 
4608492024004608516014001717332-85044 708540019001717332-8528*0-1-8480-8540 -0015 
4608468002001408560-0-00250140001400460860.00140017173 32-8 588*0-1-8 540-8600 -0016 
47086240 1900 I 7 173 32-8 6 124608 5 5200200 140a6450,nJ046086 720 I 100*0-1-8600-8660 -0017 
1 7173 32-866046086960130017173 32-868^44 7037200120017173 32-8708+0-1-8660-8720 -0018 
4 708 74401900171733 2-87 3246086 360020014087650-0-0460879201200*0-1-8 720-8780 -0019 
1 7173 32-8 78046088 160 1300 I 7 1 7 3 32-8 804 4608 8400 J11004908 8 52CC000 *0- 1-8 780-8 840 -0020 
1 717332-88404 7088760 19C0171 7332-8864460875600200 14088970J0 J 1*0- 1-8840-8900 -0021 
4 70892401 300 J 717332-89 1246039480 130049089600p000 17 17332-8948*0- 1-8900-8960 -0022 
4 708984019001 7 173 32-8972460888800200 1 4090050JIJ047090 320 1 700*0- 1-8«60-9020 -002 3 
1717332-902047090 56018001717332-9044470908002 10017173 32-9068*9-1-9020-9080 -0024 
4 7091040230017173 32-90924709128019001717 332-9 1 16460899600^00*6-1-9080-9140 -0025 
14091490-0-04709176015001717332-91644 709200016001717332-9188*0-1-9140-9200 -0026 
47092240220017173 32-92124709248019001 717332-9236460914000200*0-1-9200-9260 -002 7 
17092 84000-04100000000001709308000-0490932000000420000000000*0-1-9260-9320 -0028 
4709344019001717332-9332460926000200260942709579270942809585*0-1-9 320-9380 -0029 
43094040942117173 32-939 2490952400000410000000000450947609427*0-1-9 380-9440 -0030 
4 3094640942649094 76000004309500094221717332-9476490952400000*0-1-9440-9500 -00 31 
2 5094^n094244200000000004709548Ql900l71 7332-9536460935600200*0- 1-9500-9560 -0032 
490956600000* 0-1-9560-95 72 -0033 

-OOOO0OOJ9375* 1-1-9572-9586 -0034 

1716926-9586 16171 30K089J1609686K089J141 71 30KO89J240968617130*0- 1-9586-9646 -0035 
1716038-96874609598002C0490970000000* 0- l*-9646-9682 -0036 



-0000* 
-9598* 
-lOO-O* 

1617130000-01417130000-01716038-9760460970000200490977200000*0 
-9700* 
-lOO-O* 



1617130000 — 141713000-001716038-98 3246097 7200200490984400000*0-1-9772-9832 -0043 



-9772* 
-llO-O* 



2617130099052417130099081716038-9909460984400200490992200000*0-1-9044-9904 -0046 



J0-0-* 
-9844* 
JOOO-0* 



2617130099832417130099861716038-9987460992200200491000000000*0-1-9922-9982 -0050 



^ 10* 

-9922* 
-000-0* 

26 17 130 1006224 171 30 1006417 16038 J0065461000000200491007800000*0-1JOOOOJ0060 -0054 
JO — 0* 1-1J0060J0065 -0055 



-1-9682-9687 -0037 
-1-9687-9692 -0038 
-1-9692-9699 -0039 
-1-9700-9760 -0040 
-1-9760-9765 -0041 
-1-9765-977^ -0042 



-1-9832-9837 -0044 
-1-9837-9844 -0045 



-1-9904-9909 -0047 
-1-9909-9914 -0-048 
-1-9914-9921 -0049 



-1-9982-9987 -0051 
-1-9987-9992 -0052 

-1-9992-9999 -0053 
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JOOOO* 1-IJ0065J0070 -0056 

-000-0* 1-IJ007OJ0O77 -0057 

2617130101402417130101A31716038JOIA4461007800200A9101560QOOO*U-IJ0078J0138 -0058 
L8LL7Kt 1-IJ0138J0144 -0059 

^0078* 1-1JD144J0149 -0060 

-000-0* 1-IJ0149J0156 -0061 

2617130102172417130102201716038J0221461015600200491023AOOOOO*0-IJ0156J0216 -0062 
J0L7K* 1-1J0216J0221 -0063 

J0156* 1-1J0221J0226 -0064 

JOOO-0* 1-IJ0226J0233 -0065 

26 17 130102952417 1 30102971716038 J029846102 340020049 103100000Q*0-IJ0234J0294 -0066 
f^^^-* 1-IJ0294J0298 -0067 

*^0234* 1-1J0298J0303 -0068 

JOOO-0* 1-IJ03O3J0310 -0069 

2617 1 301037124 171 30i0374l7l6038J037546l03 1000200491038800000*0- IJ03 10 J0370 -00 70 
P-P7-* 1-IJ0370J0375 -0071 

J0310* 1-1J0375J0380 -0072 

*llO-0* 1-IJ0380J0387 -0073 

261 7 1 30 1044924 17 130 10452 17 16038 J0453461038800200491046600000*0-IJ0 388J0448 -0074 
P-P6-* 1-1J0448J0453 -0075 

J0388* 1-IJ0453J0458 -0076 

-OlO-O* 1-IJ0458J0465 -0077 

2617 1 301053524 171 30105351 716038 J0536461046600200491054800000*0-IJ0466J0526 -00 78 
-123456789* 1-1J0526J0536 -0079 

J0^66* 1-1J0536J0541 -0080 

-lOO-O* l-lJ054lJ054tJ -0081 

261 71 30106 1224 1 71 30106171716038 J0618461054800200491063000000*0-1J0548J0608 -0082 
09530R6305* 1-1J0608J0618 -0083 

Jt^548* 1-1J0618J0623 -0084 

-pOO-0* 1-1J0623J0630 -0085 

1 7 16926J06301 6 1071 3000-031 17100108342610701 1 7 10021 1070110713*0- 1J0630J0690 -0086 
15,1073700000* , 0-1J0690J0702 -0087 

1-1J0700J0702 -0088 

251072017100* 0-1J0702J0714 -0089 

-0* 1-IJ0712JO714 -0090 

3 100070 1 083443 175320008047 10762019001 71 7332J075046 1066600200*0- 1J07 14 J0774 -0091 
3 1171001710145106661710911 10713000-1431065410713491085400000*0- 1J0774J0834 -0092 
0123456789012345678* 1-1J0834J0854 -0093 

1716926J08541617 130000-011 17130000-01 716038J0926461086600200*0-1J0854J09 14 -0094 
491094000000* 0-1J0914J0926 -0095 

J0866* 1-IJ0926J0931 -0096 

-100-2-0* 1-1J0931J0940 -0097 

161 7 130000N0 11 171 30000N01716038J 100046109400020049 1101400000*0- 1J0940J 1000 -0098 
J0940* 1-1J1000J1005^ -0099 

-MO-2-0* 1-IJ1005J1014 -OIQO 

161 71 30000N0 11 17 130000N0 11 171 30000N01716038J 1086461 101400200*0- IJ 10 14J 10 74 -0101 
491110000000* 0-1J1074J1086 -0102 

JlOl^* 1-IJ1086J1091 -0103 

J010-2N0* 1-1J1091J1100 -0104 

161 71 3000J001 I 17 13000K001716038J 1160461 110000200491 I 17600000*0-1J1100J1 160 -0105 
^JllOO* 1-1J1160J1165. -0106 

J00O-3L0O* 1-IJ1165J1175 -0107 

1 61 71 30R7531 1 1 17130R753J1716038J1236461 1 17600200491 125400000*0- IJ 1176 J 1236 -0108 
J1176* l-lJ1236jl241 -0109 

-100-5-0000* 1-1J1241J1253 -OllO 

26171301 1 3162 1 17130 11 3221716038J 1323461 125400200491133800000*0- 1J1254J 13 14 -0111 
03&R99347* 1-1J1314J1323 -0112 

•^1254* 1-1J1323J1328 -0113 

J010-3R83* 1-1J1328J1338 -0114 

26171301 140721 171301 14171716038J14184611338002G0491144000000*0-IJ1338J 1398 ^-0115 
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-49763540 J-3894735261' 
J1338* 

-000J0-10816187N* 

2617 1 301 15092 1 1 71301 15 191716038J1520461 144000200491 154200000*0 

M 793853200037594400 1 ♦ 
J1440t 

JOOOJOJ58,2090795* 

26171 301 16102 1171 301 1617 1716038J161846U 54200200491 164000000*0 
-051764480063454* 
J1542* 

JOOO-9-1 1239902* 

2617130117062117130117131716038J171446H64000200491173400000*0 
-9A0530L83997g* 
J1640* 

-000-7K8994AQ* 

2617 1301 1 8032 11 71301 18 131716038J181446U73400200491 183600000*0 
J357924680P460135829* 
J173A* 

JO0OJOQ818060509* ■ _ 

2617 1301 190521 171 30 1191 I 17 16038J1912461 183600200491 193400000*0 

K IA810521RL62 71Q* 
J 1836* 

-000J0K148A6793P* 

26171 301 1999211 7130 120051716038J2006461 193400200491202400000*0 

03124605273R* 
J193A* 

JO00-6J78507* 

26171 30120982 1 1713012 1 1317 16038J2 114461202400200491214200000*0 
J 2 34 5 678923456 7088888888777778* 
J 2 02 A* 

JO lOJ 5- 12345678012 345* 
2617 130122 162 1 171 30 12231 17 16038J22324612 14200200491226000000*0 
Q93456789456789P76666666555556* 
J2142* 

JO lOJ 5070 1 234560 12 345* 
2 61713012 334211713012 3491716038J235046122600P200491237800000*0 
N67896789789899M44443333222111* 
J2260* 

JO10J5-123A0123012010* 
2617 1 30124542 1 17130 1245921 17130124591716038J2460461237800200*0 
491247800000* 0 
L164NN4673* 
J23;8* 

JC00-5P7701* 

261 7 1 301254722 17 1 30 12 55717 16038 J2558461247800200491258000000*0 
N833290764M945070316* 
J2478* 

JOOOJO-888220448* 

26171301264412 17130K94761716038J2645461258000200491266200000*0 
P8510* 
J2580* 

-010-5-799K* 

26 17 1 30 1273122 17 13012741 1716038 J2742461266200200491276400000*0 
R 99999999^^-1 23456789* 
J2662* 

jnO0J0R87654321O* 
1600080000071312787000-04312 824000804412 82400079491283600000*0 
17173 32J282426 171 30000991 7 16038 J2884461276400200491290000COO*0 
J2764* 

-100-4-000* 



1J1398J 1418 
1J1418J1423 
IJ 1423J 1440 
1J1440J1500 
IJ1500J1520 
1J1520J1525 
1J1525J1542 
1J1542J1602 
IJ1602J 1618 
1J1618J1623 
1J1623J 1639 
1J1640J 1700 
1J1700J1714 
1J1714J1719 
1J1719J1733 
1J1734J1794 
1J1794J 1814 
IJ1814J 1819 
IJ1819J 1836 
lJl836jl896 
IJ1896J1912 
1J1912J 1917 
IJ1917J1934 
IJ1>?34J 1994 
IJ1994J?006 
1J-2006J^011 
1J201 IJ2024 
1J2024J2084 
1J2084J2114 
1J21 14J21 19 
1J2119J2141 
1J2142J2202 
IJ2202J2232 
1J2232J2237 
1J2237J2259 
1J2260J2320 
1^2320J2350 
1J2350J2355 
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